Re: Copy Lines After Match

[kcott]

G'day jalopez453,

Last month, in "copy line with character", you posted almost exactly what you have here.

The advice given there (which you mostly, if not totally, appear to have ignored) would apply here. In fact, the only fundamental difference I can see is that there, you wanted to print lines that match, while here, you want to print lines that don't match.

I'd also look closely at the description you've provided. You wrote "copy the lines after the character match", which would suggest the expected output should be:

ACCT1
ACCT2
ACCT3

COMPUTER1

ACCT4
ACCT7
ACCT8
ACCT9

However, looking at your posted expected output, the description should more closely resemble: copy the non-blank lines that don't match ..."

I suggest you go back, read the advice previously given, and apply it to your current problem.

See also: "perlintro -- a brief introduction and overview of Perl".