如何使用perl正则表达式从特定字符串的整行中删除特定字符？

Question

从这个字符串模式：

  "test A dkdkd荴kdklsl skldsls荴lksdkdk skdkd荴kdkls";

我想从整行中删除这个角色..

我试过这个解决方案，但它只删除了行末尾的and而不是它在同一行包含的多于它的出现：

   $removeU8374 =~ s/^(test A .*)\N{U+8374}/$1/; 

我甚至试过这个但仍然只删除了一次，并没有从整行中删除所有出现的荴字符：

   $removeU8374 =~ s/^(test A .*)\N{U+8374}/$1/g;

Answer 1

如果要在任何地方删除它，请忽略替换中的其余字符串，例如

$removeU8374 =~ s/\N{U+8374}//g;

否则，您可以循环替换，直到它不再匹配。