regex - perl用制表符替换空间

我想从每行的开头用制表符替换每两个空格。
我尝试了以下方法:

s/^(\s{2})+/\t/gm;

它没有工作。

最佳答案

如果要逐行读取文件:

$line =~ s/\G[ ]{2}/\t/g;

如果已将整个文件都贴上了标签:

$file =~ s/(?:\G|^)[ ]{2}/\t/mg;

关于regex - perl用制表符替换空间，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/11311684/