my $count; for my $lett ('A'..'H') { for my $combo ($lett.'01'..$lett.'12') { $masterarray[$count++] = $combo; } }