#!/appl/my/perl/bin/perl

use CPAN();

$CPAN_has_usable = \&CPAN::has_usable;

local *CPAN::has_usable = sub {
    return if $_[1] =~ /^(?:Net|LWP)/;
    return $CPAN_has_usable->( @_ );
};

$CPAN::Config->{wget} = "/usr/sfw/bin/wget";

CPAN::shell();


##</code><code>##

perl -MCPAN -e'$CPAN::Config->{wget}="/usr/sfw/bin/wget";CPAN->shell()'