Perl pos 函数

说明

此函数用于查找上一个匹配子字符串的偏移量或位置。如果指定了 SCALAR，它将返回该标量变量上最后一个匹配项的偏移量。

您还可以向此函数分配一个值（例如，pos($foo) = 20;），以更改下一个匹配操作的起始点。

偏移量是从 0 位置开始的计数器。

语法

以下是此函数的简单语法 -

pos EXPR

pos

返回值

此函数在标量上下文中返回整数，然后在列表上下文中返回正则表达式中所有匹配项的位置。

示例

以下是展示其基本用法的示例代码 -

#!/usr/bin/perl -w

$name = "This is alpha beta gamma";
$name =~ m/alpha/g;

print("pos() ", pos($name), "\n");

当执行上述代码时，它会产生以下结果 -

pos() 13