Día: 23 de enero de 2007

http://www.cpan.org/misc/cpan-faq.html#How_delete_Perl_modules [shell] #!/usr/local/bin/perl -w[/shell] use ExtUtils::Packlist; use ExtUtils::Installed; $ARGV[0] or die «Usage: $0 Module::Name\n»; my $mod = $ARGV[0]; my $inst = ExtUtils::Installed->new(); foreach my $item (sort($inst->files($mod))) { print «removing $item\n»; unlink $item; } my $packfile = $inst->packlist($mod)->packlist_file(); print «removing $packfile\n»; unlink $packfile;