正则匹配关键字问题

congkk

回复 7# yinyuemi

hi, 你好， 能帮解释一下下面正则的意思吗
$str =~ m{((?<=\&)[^=]+=[^&\s]+)(*PRUNE))(?{print $1})(*FAIL)};

<=是什么意思啊， 还有+=不是运算符吧， +是前面[^=]的正则吧。


   

yinyuemi

回复 11# congkk

1. $str =~ m{((?<=\&) # 向前环视
   
2. [^=]+ # n个非'='字符
   
3. = # '='字符
   
4. [^&\s]+ # 非'&'和'\s'字符
   
5. )(*PRUNE))(?{print $1})(*FAIL)};

复制代码

只爱睡觉

回复 12# yinyuemi


学习了。

mcshell

回复 13# 只爱睡觉

1. perl -ne 'while(/(((?:\d{1,3}\.){3}\d{3})|(?<=[&?])(\w+=[^&?\s]+))/g){print "$1\n"}print "\n"' tmp
   
2. 110.143.45.135
   
3. dmt=0
   
4. dpp=231
   
5. bdllno=-DDJ10628-20120111-1709050128
   
6. id=0000000000000000000000000D222A812
   
7. dayitem=2*244*6
   
8. hok4n=CED8BFB0DA62793E9CC840B53332CD7127925
   
9. ts=13223216515
   
10. gayamt_doss=100
    
11. prodcdetype=0
    
12. boneid=1
    
13. sig=7F1B7F5E18C1910786EF55F6991F2Xs5
    
14. 
    

复制代码

只爱睡觉

回复 14# mcshell

很强大。