Perl的修饰符/m = 多行是什么意思？

Question

Perl的修饰符/m = 多行是什么意思？

3

Perl的/m修饰符在这个例子中是什么意思？

例如，假设我有以下信息在Example.txt文本文件中。每行以换行符结束，其中包含一个Data数据记录。输入记录分隔符设置为：

 $/="__Data__";

 Example.txt

 __Data__
 This is test A.\n
 This is test B.\n
 This is test C.\n
 This is test D.\n

问题1，将输入记录分隔符更改为Data后，^和$字符是否会定位如下？

  ^__Data__
  This is test A.\n
  This is test B.\n
  This is test C.\n
  This is test D.\n$

假设我在保留输入记录分隔符为Data的情况下使用/m修饰符，那么^和$字符会被设置为以下内容吗？

  ^__Data__$
  ^This is test A.\n$
  ^This is test B.\n$
  ^This is test C.\n$
  ^This is test D.\n$

  if(/__Data__/m)
  {
      print;
  }

- jbs

你在Perl中尝试过这个吗？ - Codie CodeMonkey

是的，但我不清楚如何测试^和$的位置。使用这个论坛来帮助澄清我的理解。 - jbs

编辑清理这个问题和标题会帮助新用户不因为一个有趣的问题而被踩。 - Mark

2个回答

1

你的假设是正确的，多行模式会导致 ^ 和 $ 匹配字符串的开头和结尾，而没有多行模式时，你匹配的是换行符之间（以及字符串结尾）。

- Codie CodeMonkey

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- ikegami · Accepted Answer

/$/ 不受 $/ 影响。

没有 /m，

/^/ 匹配字符串的开头。（/(?-m:^)/ ⇔ /\A/）
/$/ 匹配字符串的结尾，并匹配字符串末尾的换行符之前。（/(?-m:$)/ ⇔ /\Z/ ⇔ /(?=\n\z)|\z/）

^__Data__\n          "^" denotes where /(?-m:$)/ can match
This is test A.\n    "$" denotes where /(?-m:$)/ can match
This is test B.\n
This is test C.\n
This is test D.$\n$

使用 /m 标志，

/^/ 匹配字符串的开头和 "\n" 后面的位置。(/(?m:^)/ ⇔ /\A|(?<=\n)/)
/$/ 匹配换行符前面和字符串的末尾。 (/(?m:$)/ ⇔ /(?=\n)|\z/)

^__Data__$\n           "^" denotes where /(?m:^)/ can match
^This is test A.$\n    "$" denotes where /(?m:$)/ can match
^This is test B.$\n
^This is test C.$\n
^This is test D.$\n$

我被问及关于IT技术的问题。

...$\n$

首先，让我们进行演示：

>perl -E"say qq{abc\n} =~ /abc$/ ? 1 : 0"
1

>perl -E"say qq{abc\n} =~ /abc\n$/ ? 1 : 0"
1

重点是允许/^abc$/匹配"abc\n"和"abc"。

>perl -E"say qq{abc\n} =~ /^abc$/ ? 1 : 0"
1

>perl -E"say qq{abc} =~ /^abc$/ ? 1 : 0"
1