Help for this page
return (map{-e "$_/$target" ? "$_/$target" : ()} @dir)[0];
sub FileFinder { my $target=shift; -e "$_/$target" && return "$_/$target" foreach @_; undef }