moose-class/exercises/install-moose

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