Re: Printing lines after regexp match until match of a different regexp

Use the flipflop operator:

while (<DATA>) {
    print if /CR/ .. /NR/;
}
__DATA__
foo bar
foo
CR *FDA, 1997, GUID IND EXT REL OR
   BADAWY SIF, 1996, INT J PHARM, V128, P45
  (more lines w. similar formatting)
NR 42
more text
CR yada yada
yada yada yada
NR 17
rubbish
[download]

Output:

CR *FDA, 1997, GUID IND EXT REL OR
   BADAWY SIF, 1996, INT J PHARM, V128, P45
  (more lines w. similar formatting)
NR 42
CR yada yada
yada yada yada
NR 17
[download]

Comment on Re: Printing lines after regexp match until match of a different regexp Select or Download Code

Replies are listed 'Best First'.
Re^2: Printing lines after regexp match until match of a different regexp by turbolofi (Acolyte) on Jun 14, 2009 at 16:40 UTC
Haha, so simple. Fantastic. Thanks a bunch!	[reply]