$ ./ff_carp.pl
You did something bad! at ./ff_carp.pl line 8
        main::err() called at ./ff_carp.pl line 12
        main::wanted() called at /opt2/Perl5_8_4/lib/perl5/5.8.4/File/
Find.pm line 810
        File::Find::_find_dir('HASH(0x13e8d4)', ., 2) called at /opt2/
Perl5_8_4/lib/perl5/5.8.4/File/Find.pm line 690
        File::Find::_find_opt('HASH(0x13e8d4)', .) called at /opt2/
Perl5_8_4/lib/perl5/5.8.4/File/Find.pm line 1193
        File::Find::find('CODE(0x15e498)', .) called at ./ff_carp.pl
line 15