I think to do this successfully you will have to use opendir with the path and then use readdir to put the contents in an array. Then loop through the array testing with -f. Check 'perldoc -f opendir'. You will have to add the path back in front of the filename when doing filename check.

Nevermind. I misunderstood what you were trying to do.