substr的反义词是什么?

use*_*821 1 perl

我有一个像这样的文本文件:

dave ran very quickly
dan very slowly ran
Run Code Online (Sandbox Code Playgroud)

我在做一个正则表达式查找单词"跑",但我还需要知道它开始(它是字符6第一种情况下,在它的17第二种情况).

我有(虽然不多):

for(@lines){

if(/ran/){
 # find where ran is so we can continue parsing

}

} 
Run Code Online (Sandbox Code Playgroud)

Sea*_*ean 9

这很简单:

my $ran_pos = $-[0];
Run Code Online (Sandbox Code Playgroud)

有关perlvar@-阵列的详细说明,请参见手册页.