Perl pos 函数

  • 描述

    pos 此函数用于查找最后匹配的子字符串的偏移量或位置。如果指定了SCALAR,它将返回该标量变量上最后一个匹配项的偏移量。您也可以为此函数分配一个值(例如pos($ foo)= 20;),以更改下一个匹配操作的起点。偏移是从第零位置开始的计数器。
  • 句法

    以下是此函数的简单语法-
    
    pos EXPR
    
    pos
    
  • 返回值

    此函数在Scalar上下文中返回Integer,然后在List上下文中返回所有匹配项在正则表达式中的位置。
  • 示例

    以下是显示其基本用法的示例代码-
     
    $name = "This is alpha beta gamma";
    $name =~ m/alpha/g;
    
    print("pos() ", pos($name), "\n");
    
    尝试一下
    执行结果:
    
    pos() 13