正如“.*”这样的正则表达式如何在perl中工作

我很喜欢像.*这样的正则表达式.

#!usr/bin/perl
use strict;
use warnings;

my $text = "scott";
$text =~ s/.*/\//g;
print $text;

输出：//

所以,我不知道为什么结果是//而不是/.

第一次通过,.*匹配从零位(斯科特)开始的5个字符.这被/取代.

/ g表示尽可能多次匹配,因此它再次尝试,这次从位置5开始.

第二次通过,.*匹配从位置5开始的0个字符(空字符串).这被/取代.

第三次通过,.*从位置5(“”)开始匹配0个字符,但是有一个检查确保它连续两次与相同的起始位置和长度不匹配.所以它推进了位置并试图在第六位进行匹配.因为那是在字符串之外它失败了.

原文地址：https://www.jb51.cc/regex/356962.html