I was about to whine that welchavw's code would not produce the right results in the Win32 environment, but it does!. I wonder how it would fare on the Mac - seems like it should work there too.

Anyway - here is a minor variation on his code to enable processing/printing:

foreach( glob './*'){
  print qq($_\n); # if necessary
  # Do some work with the file name (available as $_)
};
[download]