in reply to Re: Re: grep -p ?
in thread grep -p ?
Hmm. Sounds like he should just slurp his file in paragraph mode, or if he has an array, stringify it and slurp it in paragraph mode.
A one-liner ...
perl -000 -ne 'print if /lazy/' lazy_file
See Abigail's non-one-liner too.
Update: When I wrote
stringify it and slurp ... in paragraph modeI was thinking of perl's new open-and-read-from-a-scalar, but it appears that it doesn't recognize reading in paragraph mode. Is there any way to make this work:
# assuming @array already exists for some reason $str = join "", @array; open S, "<", \$str or die; $/ = ""; # paragraph mode normally while (<S>) { print if /lazy/; } close S;
Or is this a bug? (I'm using perl 5.8.0)
|
|---|