From the discussion I see that I misunderstood your initial posting. But I am as confused as kennethk is.
What I think so far:
- you have a file with a lot of lines
- you want to match several lines and join them into one
- the lines you want to match build a consecutive range (e.g. lines 5-11)
- the range of lines you want to match starts with a line containing the string "remotely"
- the range of lines you want match ends with a line containing the string "p_agrs"
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