- or download this
# rtoa-pgatram-mce.pl
# Example run: perl rtoa-pgatram-mce.pl t1.txt >mce.tmp
...
my $tstart = time;
roman_to_arabic(\@rtoa_files);
warn sprintf("time %0.03f secs\n", time - $tstart);
- or download this
$ time ./rtoa-pgatram t1.txt >cpp.tmp
read_input_file : 3999000 items
...
real 0m5.835s 0m1.178s 0m0.671s 0m0.375s 0m0.252s
user 0m5.832s 0m9.064s 0m8.874s 0m8.935s 0m9.698s
sys 0m0.008s 0m0.024s 0m0.030s 0m0.073s 0m0.136s
- or download this
$ cksum cpp.tmp pgatram.tmp mce.tmp
1397892467 18888000 cpp.tmp
1397892467 18888000 pgatram.tmp
1397892467 18888000 mce.tmp