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