my $letter = chr(ord($string));