http://qs321.pair.com?node_id=849197


in reply to Re^4: Join lines that match an string
in thread Join lines that match an string

From the discussion I see that I misunderstood your initial posting. But I am as confused as kennethk is.

What I think so far:

Based upon that, I guessed this code:

#! /usr/bin/perl use strict; use warnings; # open file and read from that handle... while ( <DATA> ) { chomp; print if m/remotely/ ... m/p_agrs/; print $/ if m/p_agrs/; } __DATA__ not me foo remotely bar01 bar02 bar03 p_agrs i am not here foo2 remotely barbar01 p_agrs i am out...

result:

foo remotelybar01bar02bar03p_agrs foo2 remotelybarbar01p_agrs