#glob pattern, different from regular expression my @txtfile = glob ('subdir/*.txt'); print join(", ", @txtfile); print "\n"; my @curfiles = glob ('subdir/*1999*.{txt}'); print join(", ", @curfiles);