in reply to Homework help
This would be a great place to use List::Util's sum: use map to turn an array of characters into an array of points values, then add it all up.
Yours in pedantry,
F o x t r o t U n i f o r m
"Lines of code don't matter as long as I'm not writing them." -- merlyn
In Section Seekers of Perl Wisdom