$ perl -e'$x = \(1 < 2); $$x++'
Modification of a read-only value attempted at -e line 1.