note
haukex
<p>From [id://1190608|this node]:</p>
<blockquote><i>by creating a file with 1_000_000 entries, each line having 10 numbers and then running the script against it</i></blockquote>
<p>I still can't reproduce your evidence.</p>
<c>
$ perl -wMstrict -le 'print join(" ",map {int(rand(100))-50} 1..10) for 1..1000000' >in.txt
$ time python list.py in.txt >pyout.txt
real 0m1.964s
user 0m1.934s
sys 0m0.028s
$ time perl 1190602.pl in.txt >out2.txt
real 0m1.953s
user 0m1.921s
sys 0m0.028s
</c>
1190600
1190610