foreach $n (1..50) {
  print "$n: ";
  print "yes" if -e <*>;
  print "\n";
}

##</code><code>##

print "Found textfile!" if () = <$dir/*.txt>;