论坛 › Perl › perl 取出正则表达式的匹配位置

半只蚂蚁 发表于 2015-12-29 11:33:10

perl 取出正则表达式的匹配位置

my $a="1234567895";
while ($a=~/5/g) {
my $p=pos($a);
print "$p\n";
}
　　

查看完整版本: perl 取出正则表达式的匹配位置