7. Regex property names
use Unicode::Normalize qw(normalize); my $string = "Üñíçōḓĕ"; $string = normalize('D', $string); $string =~ s/\p{Combining_Mark}//g; say $string; # "Unicode"
use Unicode::Normalize qw(normalize); my $string = "Üñíçōḓĕ"; $string = normalize('D', $string); $string =~ s/\p{Combining_Mark}//g; say $string; # "Unicode"