perl仅用于查找和替换完全匹配

Question

我试图在perl中实现替换.我有一个二进制矩阵,我想替换

0与1

和

1加2.

所以我使用了以下行

s/1/2/g foreach @remaining;

但是,此命令最终会替换我的列名,其中包含数字.它将例如1234转换为2234.

我希望它匹配并仅替换1s而不是1234.

Answer 1

使用单词边界,如:

s/\b1\b/2/g foreach @remaining;

要同时替换0和1:

s/\b([01])\b/1+$1/eg foreach @remaining;