在perl中使用正则表达式在单词后面插入字符

Question

我有一个包含3行的文本文件。

secure file#123 status open
non secure file#768-m status closed
file#abc-123 status open

如何在包含|字符

的字词后添加#来获得以下输出

secure file#123 | status open
non secure file#768-m | status closed
file#abc-123 | status open

Answer 1

您可以尝试：

perl -pe 's/(#\S+)/\1 |/' file
secure file#123 | status open
non secure file#768-m | status closed
file#abc-123 | status open