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

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);
}
[download]

Untested.

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

In Section Seekers of Perl Wisdom