perl -E '$1 = 100; say $1;'

##</code><code>##

Modification of a read-only value attempted at...