Select Code to Download

use Find::Lib '../lib';

use Cwd            qw( abs_path );
use File::Basename qw( dirname );

use lib dirname(abs_path($0)).'/../lib';

$ find ! -type d -exec ls -l {} +
lrwxrwxrwx 1 eric users  8 Feb 22 17:04 ./a.pl -> bin/a.pl
...
$ a.pl
Can't locate Mod.pm in @INC (@INC contains: /home/eric/usr/perlbrew/pe
+rls/perl-5.12.2/lib/site_perl/5.12.2/i686-linux /home/eric/usr/perlbr
+ew/perls/perl-5.12.2/lib/site_perl/5.12.2 /home/eric/usr/perlbrew/per
+ls/perl-5.12.2/lib/5.12.2/i686-linux /home/eric/usr/perlbrew/perls/pe
+rl-5.12.2/lib/5.12.2 .) at ./a.pl line 3.
BEGIN failed--compilation aborted at ./a.pl line 3.