Select Code to Download

Benchmark: timing 30 iterations of REGEXP, SPLIT...
    REGEXP: 10 wallclock secs ( 9.73 usr +  0.25 sys =  9.98 CPU)
     SPLIT: 47 wallclock secs (47.20 usr +  0.28 sys = 47.48 CPU)

use strict;
use Benchmark;

...
    }
    close FH or die "\n $file: $!\n";
}