Skip to content

Instantly share code, notes, and snippets.

@bingos
Created December 1, 2010 21:38
Show Gist options
  • Save bingos/724274 to your computer and use it in GitHub Desktop.
Save bingos/724274 to your computer and use it in GitHub Desktop.
use strict;
use warnings;
use CPANPLUS::Configure
use CPANPLUS::Backend;
my $conf = CPANPLUS::Configure->new();
$conf->set_conf( no_update => '1' );
$conf->set_conf( prereqs => 0 );
$conf->set_conf( skiptest => 1 );
$conf->set_conf( verbose => 1 );
my $cb = CPANPLUS::Backend->new( $conf );
while (<>) {
chomp;
my $mod = $cb->parse_module( module => $_ );
next unless $mod;
$mod->install();
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment