print  scalarmap {  $a . $b } ", ", 'a'..'z';