菜鸟求指导，在线等，谢谢！

zhuochong

my $line = "http:localhost:8080/id=527347http:localhost:8080/id=522505";
怎么样把字符串http以及后面的内容匹配出来？
输出结果如这个@result={http:localhost:8080/id=527347，http:localhost:8080/id=522505}

zhuochong

没有大神指导下嚒？

onepublic

my @array = split('http',$line);

zhuochong

回复 3# onepublic

这个会把http也去掉了，需要保留http以及之后的内容

   

zhuochong

求大神现身

jason680

回复 1# zhuochong

1. split
foreach(split("http:",$line)){
  if($_ ne ""){
    push @result, "http:$_";
  }
}

2. RE
  push(@result,$1) while($line =~ m/(http:.+?)(?=http:|$)/g);

$ echo "http:localhost:8080/id=527347http:localhost:8080/id=522505" | perl -ne '{print "$1\n" while(m/(http:.+?)(?=http:|$)/g)}'
http:localhost:8080/id=527347
http:localhost:8080/id=522505

zhuochong

回复 6# jason680


    谢谢大神的指导，{:3_187:}