P:\test>perl -e" $x[ -1 ]->fred()"
Modification of non-creatable array value attempted, subscript -1 at -e line 1.