これで十分
perl -e 'print "$_\n" for "AAA".."ZZZ"'