wenn es eh nur dateien sein sollen und keine verzeichnisse - wieso
fragst du dann nicht per -f ab, ob es eine datei ist?
siehe perldoc -f -X