in reply to Re: Matching set of paragraph tags with string inside.
in thread Matching set of paragraph tags with string inside.
One minor difference is that splitting this way removes the close-paragraph, but not the open-paragraph, so you need to remove it.
Caution: Contents may have been coded under pressure.
If you wanted to retain both tags, you could do so by splitting on a lookbehind expression:my @arr = grep {/\[tab\]/ and s/^<p>//} split /<\/p>/, $contents;
You'd also retain the paragraph-close if you used it for $/ and read the string as a file.my @arr = grep /\[tab\]/, split /(?<=<\/p>)/, $contents;
But now I'm just getting silly.{ local $/ = '</p>'; open (STR, '<', \$contents) or die "Opening string: $!\n"; @arr = grep /^<p>/ && /\[tab\]/, <STR>; print "read $_\n" for @arr; }
Caution: Contents may have been coded under pressure.
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^3: Matching set of paragraph tags with string inside.
by jepri (Parson) on Feb 09, 2008 at 00:11 UTC | |
by Roy Johnson (Monsignor) on Feb 11, 2008 at 18:44 UTC |
In Section
Seekers of Perl Wisdom