perl -e 'my @a="aa".."zz"; print @#a;'