Help for this page

Select Code to Download

Select or download this

use File::Find;

my @dirlist = qw(.);
...
sub bar{
    die "haha!";
}