Help for this page

Select Code to Download

Select or download this

$ perl -wMstrict -le 'print join(" ",map {int(rand(100))-50} 0..rand(7
+)+3) for 1..1000000' >in.txt
$ wc -l in.txt 
...
real    0m1.539s
user    0m1.521s
sys    0m0.016s