$ perl -Mstrict -le " our $var; *var= \3.14159; print $var; $var++ "
3.14159
Modification of a read-only value attempted at -e line 1.