in reply to Print 4 Lines below matching criteria

If what you want are the lines fron "id:" to "Zip:" then:

m/^id:/ .. m/^Zip:/ and print while (<INFILE>);

does the trick.


DWIM is Perl's answer to Gödel