Christian wrote:
Hi,

Hello,

is there easy  way to capture more than one matching and print this
out?
In the example below the first matching is suppressed.

cat file |  perl -nle '/p2=(.+)(?=&p3)/&&   /p13=(.+)(?=&p14)/&&
print  $. . ";" .  $1 . ";". $2'


perl -nle'/(?=.*p2=(.+)&p3)(?=.*p13=(.+)&p14)/ && print "$.;$1;$2"' file




John
--
Any intelligent fool can make things bigger and
more complex... It takes a touch of genius -
and a lot of courage to move in the opposite
direction.                   -- Albert Einstein

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to