use Unicode::Normalize;
use Encode;
$str = "فهْ";
$string = decode("ISO-8859-1", $str); #windows-1250
$string = NFD($string);
$string =~ s/\pM//og;