[Postfixbuch-users] perl mail::spamassassin probleme
Winfried Neessen
info at neessen.net
Fr Mär 10 10:49:49 CET 2006
On Fri, 10 Mar 2006, Ralf Petry <ralf.petry at cityweb.de> wrote:
> Mail::SpamAssassin 3.1.0 macht noch mehr zicken und da ich es
> via perl -MCPAN -e shell installiert habe, hätte ich es auch
> erstmal gerne wieder entfernt [...]
>
Wo ist das Problem?
,---[ cat foo.pl ]
| #!/usr/bin/perl -w
|
| use ExtUtils::Packlist;
| use ExtUtils::Installed;
|
| $ARGV[0] or die "Usage: $0 Module::Namen";
|
| my $mod = $ARGV[0];
| my $inst = ExtUtils::Installed->new();
|
| foreach my $item (sort($inst->files($mod))) {
| print "removing: $itemn";
| unlink $item or die "a painfull death: $!";
| }
| my $packfile = $inst->packlist($mod)->packlist_file();
| print "removing packlist: $packfilen";
| unlink $packfile or die "a painfull death: $!";
`---
,---[ perl foo.pl MIME::Lite ]
| removing: /usr/local/lib/perl5/5.6.1/man/man3/MIME::Lite.3
| removing: /usr/local/lib/perl5/5.6.1/man/man3/MIME::changes.3
| removing: /usr/local/lib/perl5/site_perl/5.6.1/MIME/Lite.pm
| removing: /usr/local/lib/perl5/site_perl/5.6.1/MIME/changes.pod
| removing packlist: /usr/local/lib/perl5/site_perl/5.6.1/mach/
| auto/MIME/Lite/.packlist
`---
Gruss
Winfried
Mehr Informationen über die Mailingliste Postfixbuch-users