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