my $fn = $dirName.'/'.substr($fNameArray[$a], 1, -1) print "File '$fn' exists: ", -e $fn ? "yes\n" : "no\n";