perl -e 'bless \1' Modification of a read-only value attempted at -e line 1.