$ perl -le '*PIE=\"Apple"; $PIE = "foo"'
Modification of a read-only value attempted at -e line 1.