perl pos()函数

perl pos()函数例子，pos()函数实例代码 - pos()函数用于查找的偏移量或最后一个匹配的子串的​​位置。

语法

pos EXPR pos

定义和用法

用于查找的偏移量或最后一个匹配的子串的位置。如果指定了标量SCALAR，它会返回最后的匹配上的，标量变量的偏移量。您也可以指定一个值，这个函数（例如，POS（$ foo的）= 20;)为了改变下一匹配操作起点。

偏移量计数开始是从第零个位置。

返回值

• 在标量上下文中，整数

• 在列表上下文中，然后在正则表达式的所有匹配的位置

例子

试试下面的例子：

#!/usr/bin/perl -w
#by www.gitbook.net
$name = "This is alpha beta gamma";
$name =~ m/alpha/g;

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

这将产生以下结果：

pos() 13