Help for this page

Select Code to Download


  1. or download this
    my $data, $i, @file;
    
    ...
            $i++;
            print "$data\t$i iterations...\n" unless $i % 100;
    }
    
  2. or download this
    my $data, $i;
    
    ...
            print "$data\t$i iterations...\n" unless $i % 100;
    }
    
  3. or download this
    my $data, $i, @file;
    
    ...
            $i++;
            print "$data\t$i iterations...\n" unless $i % 100;
    }