in reply to Perl script is getting stuck for no reason

Please post the data too as it looks like to be very interesting.

In Section Seekers of Perl Wisdom