Help for this page

Select Code to Download


  1. or download this
    return (map{-e "$_/$target" ? "$_/$target" : ()} @dir)[0];
    
  2. or download this
    sub FileFinder {
      my $target=shift;
      -e "$_/$target" && return "$_/$target" foreach @_;
      undef 
    }