Help for this page
my @map2_ar = map{my$r=$_;map{$_.$r}('a'..'h')}(1..8); # 123456789_123456789_123456789_1234567890 (40)