my @a;
for$i(1..8){push@a,$_.$i for"a".."h"};

##</code><code>##

my $i; # after my @a;  sorry :-(