这个perl替换出了什么问题？

Question

my $test = "_.4.1\n";
print $test;
my $docid=4;
$test =~ s/_.$docId.1/_.$docId.0/gm;
print $test

我希望看到:

_.4.1

_.4.0

但我得到:

_.4.1

_.4.1

Answer 1

你有资金I在$docId您的正则表达式,但具有较低的情况下,声明它i.$docid不被认为是同一个变量$docId.Perl区分变量名称中的大写和小写.

你应该经常使用

use strict;
use warnings;

为了防止像这样的简单错误.

另请参阅:为什么使用严格和警告？