Help for this page

Select Code to Download


  1. or download this
    open my $log, '>', $logfile or die "Failed to create $logfile: $!\n";
  2. or download this
    for (my $round = 1; $round <= $roundlimit; $round++) {
  3. or download this
    for my $round (1 .. $roundlimit) {
  4. or download this
            if ($hitcount == 0) {
            print $log "Hitcount: $hitcount through Round $round ==> S
+TOP\n";
            last;
        }