模式匹配问题(在线等待),bow

daafu

各位,大家好
    想从一个字符串的$str1后面找起找$str2,如
$str1="1480 ?        S      0:00 /usr/sbin/sshd"
$str2="/usr/sbin/sshd"
如果在$str1的后面确实有$str2,则返回一个标志.
怎么写啊?谢谢

alexru

/(?<=$str1)str2/
好像是这样，记得不知对不？

[ 本帖最后由 alexru 于 2006-7-27 12:17 编辑 ]

daafu

谢谢楼上美女姐姐的回答
$str1="root      1559  1400  0 10:14 pts/1    00:00:00 /usr/bin/perl -w? ./ws.pl"
$str2="0:00 /usr/bin/perl ./ws.pl"

if($temp=~/$funFlag$/i) {
   print "111111111111111111111111";
}
那个print总不执行,这是什么原因?        哪位能告诉我呀!

aaronvox

原帖由 daafu 于 2006-7-26 12:09 发表
谢谢楼上美女姐姐的回答
$str1="root      1559  1400  0 10:14 pts/1    00:00:00 /usr/bin/perl -w? ./ws.pl"
$str2="0:00 /usr/bin/perl ./ws.pl"

if($temp=~/$funFlag$/i) {
   pr ...

总是没有在末尾之前匹配到 $funFlag

daafu

楼上的美美女,能解释详细点吗?谢谢

aaronvox

原帖由 daafu 于 2006-7-26 13:50 发表
楼上的美美女,能解释详细点吗?谢谢

if($temp=~/$funFlag$/i)

最后面你不是写了个$
检查下贝

ulmer

原帖由 daafu 于 2006-7-26 11:21 发表
各位,大家好
    想从一个字符串的$str1后面找起找$str2,如
$str1="1480 ?        S      0:00 /usr/sbin/sshd"
$str2="/usr/sbin/sshd"
如果在$str1的后面确实有$str2,则返回一个标志.
...

Try this:

1. 
   
2. perl -le '$str="1480 ?        S      0:00 /usr/sbin/sshd";$patt="0:00 /usr/sbin/sshd"; print 1 if $str=~/$patt$/'
   

复制代码

alexru

/(?<=str1)str2/
这样就OK了，上次是记错了，好久没看了哈
可以保证匹配的str2前有字符str1

[ 本帖最后由 alexru 于 2006-7-27 12:20 编辑 ]