Keith Whyte wrote:

i got super vicious and ran:
$ find -type f -mtime +30 -exec rm {} \;
in /usr/lib/perl5


Actually I lie here above.
I'm posting again in case anybody else might be a reckless as me and DESTROY their perl instalation and then blame it on my mail.


I ran
find -type f -mtime +30 -exec cp -aPv {} /tmp/perl5 \;
first, to make a copy of these files, so that I could put them back if needed.
MimeDefang wanted the MIME Tools and various stuff, which i copied back, coz i can't be bothered to go looking for the source of that version of patched Mime tools that MD needs.


But, in the course of copying files back, I was able to find the culprit -
/usr/lib/perl5/site_perl# ls Digest -l
total 32
-r--r--r--   1 root     root         2433 Mar 14  2001 HMAC.pm
-r--r--r--   1 root     root         1114 Mar 14  2001 HMAC_MD5.pm
-r--r--r--   1 root     root         1133 Mar 14  2001 HMAC_SHA1.pm
-r--r--r--   1 root     root         7066 May  6  2002 MD5.pm
-r--r--r--   1 root     root          825 Jun 13  2002 Nilsimsa.pm
-r--r--r--   1 root     root         2679 Dec 30  2001 SHA1.pm
-r--r--r--   1 root     root         1804 Nov 28  2003 base.pm

rm -r /usr/lib/perl5/site_perl/Digest does the trick.

and i find i also have to nuke rm -r /usr/lib/perl5/site_perl/Time, getting more errors there..

Keith.



Reply via email to