This script takes about the same amount of time in 5.6.2 and 5.16.0. -doy --- via perlbug: queue: perl5 status: open https://rt.perl.org:443/rt3/Ticket/Display.html?id=3423