in reply to Speeding up stalled script

considering your background, I think the best & quickest way to speed up your script is using MCE and replacing while with MCE::Loop: 
use MCE::Loop;
 

mce_loop_f { chomp; do_work($_) } "/path/to/file";

[download]


I am trying to improve my English skills, if you see a mistake please feel free to reply or /msg me a correction

In Section Seekers of Perl Wisdom