my $new_ch = ( $old_ch - 'a' ) + 1;