Help for this page

Select Code to Download


  1. 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);
    
  2. 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
    
  3. or download this
    $ cksum cpp.tmp pgatram.tmp mce.tmp
    1397892467 18888000 cpp.tmp
    1397892467 18888000 pgatram.tmp
    1397892467 18888000 mce.tmp