my $str = 'y';
    $str ++; print "$str\n"; 
    $str ++; print "$str\n";