my $new_ch = chr( ord( $old_ch ) - 96 );