xml - 使用 perl 或 sed 操作 xml

Question

输入线：

<column name="Sample"><![TEST[x-y]]></column>

输出线：

<column name="Sample"><![TEST[y]]></column>

x是任何数字

y是任何数字

我想摆脱x-. 如何在 Perl 中做到这一点？或者也许可以使用 sed？

Answer 1

这个正则表达式应该确实想要你想要的：

$line=~s/(?<=<\!\[TEST\[)\d+\-//;

单线风味：

perl -pe 's/(?<=<\!\[TEST\[)\d+\-//' file.xml

但是，正如之前在 StackOverflow 中所说 ，避免使用正则表达式解析/处理 XML。改用模块（例如XML::Simple）。