$ perl -le '$1=undef;'
Modification of a read-only value attempted at -e line 1.