Help for this page

Select Code to Download


  1. 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";