Select Code to Download

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

        print "the file code took:",timestr(timediff($a1_n, $a1_0)),"\
+n";
}