map { $sum += $index{$_}}  split (//,$word);