my @message=(8,5,12,12,15);
print map(chr(96+$_),@message); # Change the 96 to 64 for uppercase