##
perl -e 'my @a="aa".."zz"; print scalar(@a);'
####
perl -e 'my @a="aa".."zz"; print @#a;'
####
perl -e 'print length($("aa".."zz"));'
####
perl -e 'print length(@("aa".."zz"));'
####
perl -e 'my $len=@("aa".."zz");print $len;'