perl -e "print 1++"

Can't modify constant item in postincrement (++) at -e line 1, near "1++"
Execution of -e aborted due to compilation errors.

##</code><code>##

sub incr { $_[0]++ };

incr($foo);
incr(1);