Help for this page

Select Code to Download


  1. or download this
    open(FH, "wrongs") or die $!;
open(FH2, ">wrongs2") or die $!;
...
}
close (FH);
close (FH2);
  2. or download this
    use Benchmark;
$start = new Benchmark;
...

# output
# replaced: 35000 The operation took:  0 wallclock secs ( 0.23 usr  0.
+03 sys +  0.00 cusr  0.00 csys =  0.27 CPU)