Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl -wl
use strict;
...
    print "Processed $numfiles files (total files:$totalfiles)";
    exit;
}

Select or download this

$ time ./gfather.pl
dump.1167332700 McDarren 71
Processed 9054 files (total files:57868)
       39.15 real         0.84 user         0.75 sys