C:\test>perl -le"print 'a'x1024 for 1..1e5" > 1kLines.txt C:\test>perl -pe"s/a/A/g}{warn join' ',$., times" 1kLines.txt > output.cmp 100000 23.805 0.374 0 0 at -e line 1, <> line 100000. C:\test>junk71 -T=1 1kLines.txt > output.cmp Started Thu Mar 24 03:33:09 2011 Ended Thu Mar 24 03:33:34 2011 27.097 0.873 0 0 at C:\test\junk71.pl line 38, <> line 100000. C:\test>junk71 -T=2 1kLines.txt > output.cmp Started Thu Mar 24 03:33:56 2011 Ended Thu Mar 24 03:34:09 2011 27.705 1.591 0 0 at C:\test\junk71.pl line 38, <> line 100000. C:\test>junk71 -T=3 1kLines.txt > output.cmp Started Thu Mar 24 03:34:19 2011 Ended Thu Mar 24 03:34:29 2011 28.111 1.544 0 0 at C:\test\junk71.pl line 38, <> line 100000. C:\test>junk71 -T=4 1kLines.txt > output.cmp Started Thu Mar 24 03:34:35 2011 Ended Thu Mar 24 03:34:43 2011 28.126 3.042 0 0 at C:\test\junk71.pl line 38, <> line 100000.