| 1 | package CPAN::Nox; |
| 2 | use strict; |
| 3 | use vars qw($VERSION @EXPORT); |
| 4 | |
| 5 | BEGIN{ |
| 6 | $CPAN::Suppress_readline=1 unless defined $CPAN::term; |
| 7 | } |
| 8 | |
| 9 | use base 'Exporter'; |
| 10 | use CPAN; |
| 11 | |
| 12 | $VERSION = "1.02"; |
| 13 | $CPAN::META->has_inst('Digest::MD5','no'); |
| 14 | $CPAN::META->has_inst('LWP','no'); |
| 15 | $CPAN::META->has_inst('Compress::Zlib','no'); |
| 16 | @EXPORT = @CPAN::EXPORT; |
| 17 | |
| 18 | *AUTOLOAD = \&CPAN::AUTOLOAD; |
| 19 | |
| 20 | __END__ |
| 21 | |
| 22 | =head1 NAME |
| 23 | |
| 24 | CPAN::Nox - Wrapper around CPAN.pm without using any XS module |
| 25 | |
| 26 | =head1 SYNOPSIS |
| 27 | |
| 28 | Interactive mode: |
| 29 | |
| 30 | perl -MCPAN::Nox -e shell; |
| 31 | |
| 32 | =head1 DESCRIPTION |
| 33 | |
| 34 | This package has the same functionality as CPAN.pm, but tries to |
| 35 | prevent the usage of compiled extensions during its own |
| 36 | execution. Its primary purpose is a rescue in case you upgraded perl |
| 37 | and broke binary compatibility somehow. |
| 38 | |
| 39 | =head1 SEE ALSO |
| 40 | |
| 41 | CPAN(3) |
| 42 | |
| 43 | =cut |
| 44 | |