[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