my @a = ('A'..'Z');

Without the quotes A and Z are "bare words" that could be interpreted as something other than the manafest constant strings that you intended. Consider for example:

sub A
{
'K';
}

my @a = (A..'Z');
print join "\n", @a;
[download]