[gitmo/moose-presentations.git] / moose-class / exercises / install-moose

#!/usr/bin/env perl

use Cwd qw( abs_path );
use CPAN;
use File::Spec;

if ( CPAN::HandleConfig->can('load') ) {
    CPAN::HandleConfig->load();
}
else {
    CPAN::Config->load();
}

$CPAN::Config->{connect_to_internet_ok} = 0;
$CPAN::Config->{urllist}
    = [ 'file://' . File::Spec->catdir( abs_path(q{.}), 'moosepan' ) ];

CPAN::Shell->install('Moose');
Commit	Line	Data
32c45916	1	#!/usr/bin/env perl
afaa1345	2
	3	use Cwd qw( abs_path );
	4	use CPAN;
	5	use File::Spec;
	6
d580e02d	7	if ( CPAN::HandleConfig->can('load') ) {
	8	CPAN::HandleConfig->load();
	9	}
	10	else {
	11	CPAN::Config->load();
	12	}
afaa1345	13
41abfca2	14	$CPAN::Config->{connect_to_internet_ok} = 0;
d7edc40a	15	$CPAN::Config->{urllist}
d7edc40a	16	= [ 'file://' . File::Spec->catdir( abs_path(q{.}), 'moosepan' ) ];
afaa1345	17
	18	CPAN::Shell->install('Moose');
	19