Searched refs:_match_codeblock (Results 1 – 2 of 2) sorted by relevance
| /mirbsd/src/gnu/usr.bin/perl/lib/ |
| D | Switch.pm | 126 …@pos = Text::Balanced::_match_codeblock(\$source,qr/\s*/,qr/\(/,qr/\)/,qr/[[{(<]/,qr/[]})>]/,undef…
136 @pos = Text::Balanced::_match_codeblock(\$source,qr/\s*/,qr/\{/,qr/\}/,qr/\{/,qr/\}/,undef)
157 …elsif (@pos = Text::Balanced::_match_codeblock(\$source,qr/\s*/,qr/\{/,qr/\}/,qr/\{/,qr/\}/,undef)…
163 …elsif (@pos = Text::Balanced::_match_codeblock(\$source,qr/\s*/,qr/[[(]/,qr/[])]/,qr/[[({]/,qr/[])…
201 do{@pos = Text::Balanced::_match_codeblock(\$source,qr/\s*/,qr/\{/,qr/\}/,qr/\{/,qr/\}/,undef)}
|
| /mirbsd/src/gnu/usr.bin/perl/lib/Text/ |
| D | Balanced.pm | 37 sub _match_codeblock($$$$$$$);
463 or _match_codeblock($textref, "", '\{', '\}', '\{', '\}', 0)
475 next if _match_codeblock($textref,
479 next if _match_codeblock($textref,
513 my @match = _match_codeblock($textref, $pre,
524 sub _match_codeblock($$$$$$$) subroutine
599 if ( _match_codeblock($textref, '\s*', $ldel_inner, $rdel_inner, $ldel_inner, $rdel_inner, $rd) )
|