$xml_native =~ s/([^\w\s])/'&#'.ord($1).';'/ge;