in reply to get directory listing

while (<@FILES>)
Definitely very broken code. See my previous writeup on that.

-- Randal L. Schwartz, Perl hacker
Be sure to read my standard disclaimer if this is a reply.