$ perl -e'$x=3; CORE::say for $x++, $x++'
3
4

##</code><code>##

$ perl -e'$x=3; CORE::say for ++$x, ++$x'
5
5

##</code><code>##

$ perl -e'$x=3; CORE::say for $x, $x++'
4
3