for (scalar($i=3, $i=2, $i=1)) {
  print "$_ and $i\n";
}

##</code><code>##

$i=3, $i=2, $i=1;
for ($i, $i, $i) {
  print "$_ and $i\n";
}

##</code><code>##

for (0+($i=3), 0+($i=2), $i=1) {
  print "$_ and $i\n";
}