Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl -w

...
    $x++;
    $x++;
}

Select or download this

Benchmark: timing 100000 iterations of loop, noloop...
      loop:  4 wallclock secs ( 3.48 usr +  0.03 sys =  3.51 CPU) @ 28
+490.03/s (
n=100000)
    noloop:  0 wallclock secs ( 1.09 usr +  0.00 sys =  1.09 CPU) @ 91
+743.12/s (
n=100000)