Select Code to Download

use v5.30;
use MCE;
...
  }
)->run;

$ rm -f out; time perl demo.pl | LC_ALL=C sort -k2rn > out
real   0m34.779s
...
real   0m04.287s
user   1m54.859s
sys    0m01.748s

$ time perl demo.pl > out.in
real   0m01.396s
...
total time             0.521 secs    0.419 secs
    count lines     16000000
    count unique    16000000