Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use Benchmark;

...
      }
    }
}

Select or download this

prompt% parse.pl '/*' '*/'
Benchmark: timing 100000 iterations of parse1, parse2...
    parse1: 42 wallclock secs (30.07 usr +  0.11 sys = 30.18 CPU)
    parse2: 17 wallclock secs (13.60 usr +  0.04 sys = 13.64 CPU)