$ perl -le 'my $x = 0; print $x++'
0
$ perl -le 'my $x = 0; print ++$x'
1