Re: Array shuffle code produces 'Modification of non-creatable array value attempted' error

Select or download this

$ perl -e'   @a = qw( abc def );
             $a[-1] = "ghi";
             $a[-2] = "jkl";
             $a[-3] = "mno";       '
Modification of non-creatable array value attempted, subscript -3 at -
+e line 4.

Select or download this

while ( --$i )

Select or download this

while ( --$i > 0 )

Select Code to Download