Select Code to Download

perl -we "@array = qw/one two three/; print @array[1], $/;"

Scalar value @array[1] better written as $array[1] at -e line 1.

print $array_a->[0];