Select Code to Download

use strict;
use warnings;
...
print "accented char=$accented_char\n";                               
+                                               
my $lowercased = lc( $accented_char );                                
+                                               
print "lowercased=$lowercased\n";

use strict;
use warnings;
...
  my $lc_char = lc( $char );
  print "lowercased $char=$lc_char\n";
}