Help for this page

Select Code to Download


  1. or download this
       USAGE: cpannn.pl [02packages.details.txt]
    
    ...
       TAB completion enabled on all sub namespaces
       cpannn.pl by Discipulus as found at perlmonks.org
    
  2. or download this
    #!perl
    use strict;
    ...
        my $num = scalar@{[grep $_ !~ $skiprx, keys %$hr]};
        print "\n",(join '::',@cur_names or 'CPAN'),($$hr{'+'}->[0] ? "\t$
    +$hr{'+'}->[0]\t$$hr{'+'}->[1]" : "")," contains ",$num," namespace".(
    +$num>1?'s':'')."\n\n";
    }