懒惰匹配

Question

$strbuff = "PREFIX|aaaa|bbbb|gggg|cccc|dddd";

$strbuff =~ /.+\|(a.+?)\|b(.+?)\|(c.+?)\|(d.+?)$/;

print "a is:".$1."\n";
print "b is:".$2."\n";
print "c is:".$3."\n";
print "d is:".$4."\n";

为什么$2的值是bbb|gggg？ 我希望$2=bbb。

Answer 1

2. /\|(a+?)\|(b+?)\|(c+?)\|(d+?)$/

复制代码

Answer 2

你RE中少了个 \|g(.+?)

Answer 3

/\|(a+?)\|(b+?)\|(c+?)\|(d+?)$/

这样的话， $1  ~ $4 都没有值了

Answer 4

回复 3# zhlong8

我就是要处理|b和|c中可能出现其他数据的情况， 例如|gggg。
请问是不是可以跳过|gggg?

Answer 5

本帖最后由 albertd 于 2011-04-14 15:16 编辑

$strbuff =~ /\|(.+?a)\|(.+?b)\|.*\|(.+?c)\|(.+?d)$/;

Answer 6

1. $strbuff =~ /\|(.+?a)\|(.+?b)\|.*\|(.+?c)\|(.+?d)$/;

复制代码

Answer 7

$strbuff =~ /\|(.+?a)\|(.+?b)\|.*\|(.+?c)\|(.+?d)$/;
albertd 发表于 2011-04-14 15:08

   行了， 谢谢！！！！

Answer 8

$strbuff = "REFIX|aaaa|bbbb|gggg|cccc|dddd";

$strbuff =~ /.+\|(a.+?)\|b(.+?)\|(c.+?)\|(d.+?)$/;
...
ianywhere 发表于 2011-04-14 14:32

$ cat split.pl
$strbuff = "PREFIX|aaaa|bbbb|gggg|cccc|dddd";
@data = (split('\|', $strbuff))[1,2,4,5];
print "@data\n";

$ perl split.pl
aaaa bbbb cccc dddd

Answer 9

$ cat split.pl
$strbuff = "REFIX|aaaa|bbbb|gggg|cccc|dddd";
@data = (split('\|', $strbuff) ...
jason680 发表于 2011-04-14 17:29

谢谢！