for (1..100) { ++$x; $x+=$y+=$z }