ord uses the first char of EXPR so:

for(@words)
{
     print chr ord $_;
}
[download]

would print only first letters