in reply to Getting To Grips With Taint - And Picking Up Files
foreach $file (glob '/var/log/accounts/*') { will allow you to remove 3 lines of code, including that pesky ls
-- Tommy Too stupid to live. Too stubborn to die.