Help for this page

Select Code to Download

Select or download this

use strict;
use HTML::Element;
...
print "Start: ", scalar(localtime), "\n";
for my $i (0..1_000_000) { funny($a); }
print "Finish: ", scalar(localtime), "\n";