Help for this page

Select Code to Download


  1. or download this
    "doh! can't read directory $file!\n"
  if (-d $file and not -r _);
  2. or download this
    sub wanted{
    print $File::Find::name if -d $_ and $r $_;
}
  3. or download this
    sub wanted{
    print $File::Find::name if -d _ and -r _;
}