Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re^3: Text::Balanced with nested / custom brackets

by ikegami (Pope)
on Sep 07, 2006 at 22:36 UTC ( #571822=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Text::Balanced with nested / custom brackets
in thread Text::Balanced with nested / custom brackets

The function to extract tagged data can indeed be used.

my @links; my $extractor = gen_extract_tagged('[[', ']]', qr/(?:(?!\[\[).)*/); for (;;) { (my $link, $text) = $extractor->($text); last if not defined $link; push(@links, $link); }

Untested.


Comment on Re^3: Text::Balanced with nested / custom brackets
Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://571822]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (4)
As of 2014-08-21 03:59 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (127 votes), past polls