$a = 1; print ++$a, ":", $a, "\n";
$a = 1; print $a++, ":", $a, "\n";