Select Code to Download

$ perl -e 'my @x; $x[0] = 1'

$ perl -e 'my @x; $x[-1] = 1'
Modification of non-creatable array value attempted ...