http://qs1969.pair.com?node_id=289788


in reply to Re: 2Re: Improvement on script needed.
in thread Improvement on script needed.

You shouldn't read DATA inside the while loop. In the first iteration of the while loop,
my @files = (<DATA>);
sucks up what's left in DATA and the loop terminates.