Judging by the info given in this thread, looks like an buffer overflow bug in File::Find. Appending "/.." when it should not.

Catching errors in Perl is done with the block form of eval. Something like:

eval {
   code_that_dies;
}
if ( $@ ne '' ) {
   code_to_recover_from_code_that_dies;
}
[download]

There are modules to sugar the syntax; search for "error" and "exception" on CPAN.

Be well,
rir