14:08 >perl -wE "my @a = (1, 3, 7); say @a; say [@a]; say length[@a];"
137
ARRAY(0x53b0d0)
15

14:11 >

##</code><code>##

for ($ctr = $#data_array; $ctr >= 0; $ctr--) {

##</code><code>##

for (reverse 0 .. $#data_array) {

##</code><code>##

14:49 >perl -wE "my @x = (12, 34, 567); say $x[3];"
Use of uninitialized value in say at -e line 1.


14:50 >