blib/lib/Pod/Weaver/Section/AllowOverride.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 14 | 18 | 77.7 |
line | true | false | branch |
---|---|---|---|
91 | 9 | 0 | if (&$match($children->[$i])) |
108 | 1 | 9 | unless $override |
114 | 6 | 3 | if ($self->match_anywhere) { } |
117 | 0 | 9 | unless $pos-- |
119 | 6 | 3 | if &$section_matcher($children->[$pos]) |
123 | 3 | 0 | if (@$children and &$section_matcher($children->[-1])) { } |
134 | 3 | 6 | if $action eq 'replace' or not $prev |
138 | 3 | 3 | if ($action eq 'prepend') { } |
3 | 0 | elsif ($action eq 'append') { } |