line |
true |
false |
branch |
8
|
0 |
0 |
unless ref $node |
9
|
0 |
0 |
$self->node_is_block($node) ? : |
20
|
0 |
0 |
if (not $node =~ /\n/) { } |
|
0 |
0 |
elsif (not $node =~ /\n\n/) { } |
34
|
0 |
0 |
if ($self->option->{'wrap'}) |
36
|
0 |
0 |
unless ($out =~ /^=for /) |
65
|
0 |
0 |
ref $node ? : |
66
|
0 |
0 |
$self->option->{'pod-upper-head'} ? : |
68
|
0 |
0 |
if (defined $abstract) { } |
80
|
0 |
0 |
if $number eq '1' and $self->option->{'pod-upper-head'} |
125
|
0 |
0 |
length $text == 0 ? : |
135
|
0 |
0 |
if defined $self->meta and defined $self->meta->{'pod-custom-link'} |
136
|
0 |
0 |
length $text == 0 ? : |
144
|
0 |
0 |
unless ref($customs) =~ /ARRAY/ |
148
|
0 |
0 |
unless my $regex = $custom->{'match'} |
150
|
0 |
0 |
unless my $format = $custom->{'format'} |
151
|
0 |
0 |
unless my(@captures) = $link =~ /$regex/g |
159
|
0 |
0 |
!($text =~ /(<<<<< | >>>>>)/) ? : |
|
0 |
0 |
!($text =~ /(<<<< | >>>>)/) ? : |
|
0 |
0 |
!($text =~ /(<<< | >>>)/) ? : |
|
0 |
0 |
!($text =~ /(<< | >>)/) ? : |
|
0 |
0 |
!($text =~ /[<>]/) ? : |
177
|
0 |
0 |
if @$node |
195
|
0 |
0 |
if @$node |
206
|
0 |
0 |
if (length $def) |
209
|
0 |
0 |
if ($rest) |