or download this
$ ./tst-loopthrough2.pl --dir /work/eng
Bad index while coercing array into hash at ./tst-loopthrough2.pl line
+ 101.
...
Filename: /work/eng/feeds/customer_care/test/q_data_20111023.dat
Size: 379085
Directory: /work/eng/feeds/customer_care/test