Select Code to Download

Parsing 3457 files
regex: 4.126449
...
real    0m4.194s
user    0m13.465s
sys    0m0.414s

Parsing 17285 files
regex: 20.588749
...
real    0m20.681s
user    1m7.373s
sys    0m1.873s

#!/usr/bin/perl
use strict;
...

$elapsed = tv_interval($t0);
print "regex: $elapsed\n" if $benchmark;