diff options
Diffstat (limited to 'test.pl')
| -rw-r--r-- | test.pl | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/test.pl b/test.pl new file mode 100644 index 0000000000..2502cb1298 --- /dev/null +++ b/test.pl @@ -0,0 +1,34 @@ +<? + +$i = 0; +$j = 1; + +for ($k=0; $k<1000000; $k = $k+1) { + while ($i<10000000) { + if (($i%"4")<1) { + $i = $i+"1"; + if ($j%"2") { + $i = $i * "2"; + } + } elseif (($i%"4")<2) { + $i = $i+"2"; + if ($j%"2") { + $i = $i * "2"; + } + } elseif (($i%"4")<3) { + $i = $i+3; + if ($j%"2") { + $i = $i * "2"; + } + } else { + $i = $i+"4"; + if ($j%"2") { + $i = $i * "2"; + } + } + $j = $j+1; + } +} +print $i; +print "\n"; + |