perl -E "my @keys = qw/1 2 43/; say $_ for( @keys); say \"count of \$#keys: $#keys\";"
1
2
43
count of $#keys: 2