Select Code to Download

~/test$ perl -e '$1 = "blah"'
Modification of a read-only value attempted at -e line 1.

~/test$ perl -le '$var = "blah"; $var =~ /^(....)$/; print $1'
blah