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