Select Code to Download

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

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

# threads: init data before spawning

...
real   0m31.510s
user  12m26.168s
sys    0m10.089s