Select Code to Download

$str = Unicode::Normalize::NFKD($str);
$str =~ s/\p{NonspacingMark}//g;

## Demonstrate stripping of diacritical marks from Unicode strings
## April 2010, Bryce Nesbitt, Berkeley Electronic Press
...
    }
    return $outstring;
}

Input: <0x1ec5> m<0xe4>rks <0xfb00> <0x153>
NFKD : e<0x302><0x303> ma<0x308>rks ff <0x153>
Out  : e marks ff <0x153>