Select Code to Download

# https://perlmonks.org/?node_id=11152186
$ ./rtoa-pgatram-allinone2 t1.txt t1.txt t1.txt t1.txt | cksum
do_it_all time    :    0.515 secs  fast_io scan, line_get
do_it_all time    :    0.490 secs  fast_io memory mapping
737201628 75552000

// Read an input file of Roman Numerals and do it all
static void do_it_all(
...
      fast_io::io::perrln("Error opening '", fname, "' : ", e);
   };
}

# https://perlmonks.org/?node_id=11152186
$ time ./rtoa-pgatram-allinone2 t1.txt t1.txt t1.txt t1.txt | cksum
...
real    0m0.449s
user    0m21.884s
sys     0m0.592s

      user_func   => sub {
         my ( $mce, $slurp_ref, $chunk_id, $output ) = ( @_, '' );
...
       #    print $output;
         };
      }

# max_workers => 32
$ time perl rtoa-pgatram-mce.pl t1.txt t1.txt t1.txt t1.txt
...
real    0m0.093s
user    0m0.195s
sys     0m0.441s