Select Code to Download

regex: 37.940104 seconds
substr: 14.430599 seconds

#!/usr/bin/perl

...
$stop = [gettimeofday()];
$run_time = tv_interval($start,$stop);
print "substr: $run_time seconds\n";