| |||
|
|
в общем, она ни в начале, ни в конце ничего не делает даже если написать $newdata =~ s/[\p{Mn}\p{Me}]//g; либо же 1 while $newdata =~ s/[\p{Mn}\p{Me}]//g; возможно, с точки зрения перла эти юникодные буквы не соответствуют /[\p{Mn}\p{Me}]/ либо я не туда пишу, либо что-то еще Добавить комментарий: |
||||