C:\test>\perl22\bin\perl 1176081.pl -WIDTH=10000 -HEIGHT=10000
yr() took 12.714030
buk() took 110.152981
buk2() took 70.100982
buk3() took 8.158657