Statement Perl

@alpha=(a .. z, "\n");
print foreach @alpha;