| line |
true |
false |
branch |
|
282
|
2 |
0 |
if (ref $_[0]) |
|
286
|
2 |
0 |
if (ref $_[0]) { } |
|
291
|
0 |
0 |
ref $_ ? : |
|
294
|
0 |
0 |
if $^O =~ /win|os2/i |
|
323
|
0 |
2 |
if ($opts{-'filter'}) |
|
327
|
0 |
2 |
unless keys %PODS |
|
336
|
0 |
3 |
if $opts{-'verbose'} |
|
346
|
0 |
3 |
if ($errs == -1) { } |
|
|
0 |
3 |
elsif ($errs > 0) { } |
|
347
|
0 |
0 |
if $opts{'-warnings'} |
|
360
|
0 |
3 |
if ($name eq 'perlrun') |
|
364
|
0 |
0 |
if ($$_[0] =~ /^(-\w)\S/ and not $have{$1}++) |
|
384
|
0 |
0 |
unless ($have_it) |
|
391
|
0 |
0 |
if ($name ne '*' and not defined $lib{$name}) |
|
404
|
0 |
1 |
unless $$a[1] cmp $$b[1] |
|
424
|
0 |
3 |
if $opts{-'verbose'} |
|
429
|
1 |
1 |
$current_opts{-'idx'} ? : |
|
|
1 |
2 |
$i < $#cache ? : |
|
431
|
1 |
1 |
$current_opts{-'toc'} ? : |
|
|
1 |
2 |
$i > 0 ? : |
|
439
|
0 |
3 |
if ($opts{-'filter'}) { } |
|
443
|
0 |
3 |
$opts{-'outfile'} ? : |
|
446
|
0 |
3 |
unless -d $ddir |
|
454
|
0 |
3 |
if ($opts{-'ps'}) |
|
458
|
0 |
0 |
unless -d $ddir |
|
471
|
1 |
1 |
if ($opts{-'toc'}) |
|
476
|
0 |
1 |
if $opts{-'verbose'} |
|
501
|
1 |
0 |
if (my $desc = $_->description) { } |
|
502
|
1 |
0 |
ref $desc ? : |
|
506
|
0 |
0 |
unless $class and $class eq 'POD_LINK' |
|
526
|
0 |
1 |
if ($opts{-'ps'}) |
|
539
|
1 |
1 |
if ($opts{-'idx'}) |
|
543
|
0 |
1 |
if $opts{-'verbose'} |
|
557
|
7 |
0 |
if ($text =~ /^\W*([a-z])/i) { } |
|
|
0 |
0 |
elsif ($text =~ /^\W*([0-9])/) { } |
|
570
|
2 |
2 |
unless defined $idx{$key} |
|
594
|
0 |
1 |
if ($opts{-'ps'}) |
|
609
|
0 |
0 |
if $$opts{-'verbose'} |
|
610
|
0 |
0 |
unless (open PS, ">$file") |
|
671
|
0 |
3 |
unless defined $$self{-'localtoc'} |
|
674
|
0 |
3 |
unless defined $$self{-'navigation'} |
|
736
|
0 |
5 |
if ($$self{-'stylesheet'}) |
|
748
|
5 |
0 |
if ($name) |
|
755
|
5 |
0 |
if ($$self{-'navigation'}) |
|
763
|
3 |
2 |
if ($$self{'-next'}) |
|
772
|
3 |
2 |
if ($$self{'-prev'}) |
|
785
|
3 |
2 |
if ($$self{-'toc'}) |
|
796
|
3 |
2 |
if ($$self{-'idx'}) |
|
818
|
5 |
0 |
if $$self{-'banner'} |
|
833
|
2 |
14 |
if (defined $depth) { } |
|
|
3 |
11 |
elsif (not defined $$self{-'depth'}) { } |
|
851
|
3 |
6 |
@_ > 1 ? : |
|
865
|
3 |
12 |
unless (defined $$self{'_indices'}) |
|
868
|
12 |
3 |
if (@_) { } |
|
892
|
0 |
3 |
@_ > 1 ? : |
|
922
|
3 |
0 |
if ($$self{-'localtoc'}) |
|
937
|
0 |
5 |
if $verbose |
|
939
|
2 |
3 |
if (not $handle) { } |
|
940
|
0 |
2 |
unless (open OUT, ">$file") |
|
958
|
9 |
19 |
if ($command =~ /^head(\d)/) { } |
|
|
4 |
15 |
elsif ($command eq 'over') { } |
|
|
11 |
4 |
elsif ($command eq 'item') { } |
|
|
4 |
0 |
elsif ($command eq 'back') { } |
|
|
0 |
0 |
elsif ($command eq 'for') { } |
|
|
0 |
0 |
elsif ($command eq 'begin') { } |
|
|
0 |
0 |
elsif ($command eq 'end') { } |
|
987
|
6 |
3 |
if ($n == 1) |
|
990
|
9 |
0 |
if ($$self{-'localtoc'}) |
|
1007
|
0 |
11 |
unless (@{$$self{'_list_stack'};}) |
|
1016
|
4 |
7 |
if (not $list->type) { } |
|
|
4 |
3 |
elsif (my $rx = $list->rx) { } |
|
1018
|
0 |
4 |
if ($paragraph =~ s/^()\s*\d+\.?\s*/$1/) { } |
|
|
2 |
2 |
elsif ($paragraph =~ s/^((\s*\w<)*)\s*[*]\s*/$1/ or $paragraph =~ s/^\s*$//) { } |
|
1051
|
5 |
6 |
if ($list->type eq 'dl') { } |
|
1054
|
0 |
5 |
if (defined $content and ref $content and @$content and ref $$content[-1] and $$content[-1]->tag eq 'dd' and $$content[-1]->is_empty) { } |
|
1069
|
3 |
3 |
if (length $paragraph) { } |
|
1082
|
11 |
0 |
if ($$self{-'idxopt'} =~ /(^|,)item(,|$)/i) |
|
1084
|
8 |
3 |
if $paragraph =~ /^\s*(\w<\s*)*(\S*)/ and $2 |
|
1093
|
0 |
4 |
if (not $list) { } |
|
1106
|
0 |
0 |
if ($paragraph =~ s/^[\s\n]*(\S+)[\s\n]*// and lc $1 eq 'html') |
|
1116
|
0 |
0 |
if (not $paragraph =~ /(\S+)/) { } |
|
1122
|
0 |
0 |
if ($$self{'_begin'} eq 'html') |
|
1134
|
0 |
0 |
if ($$self{'_raw_html'}) |
|
1150
|
0 |
0 |
if (defined $content and ref $content and @$content and ref $$content[-2] and $$content[-2]->tag eq 'p') { } |
|
1168
|
1 |
0 |
if (not length $paragraph) { } |
|
|
0 |
0 |
elsif (not $$self{'_begin'}) { } |
|
|
0 |
0 |
elsif ($$self{'_begin'} eq 'html') { } |
|
1177
|
0 |
0 |
if (defined $content and ref $content and @$content and ref $$content[-2] and $$content[-2]->tag eq 'pre') { } |
|
1186
|
0 |
0 |
if ($$self{'_current_head1_title'} eq 'NAME' and not $self->description) |
|
1190
|
0 |
0 |
if $str |
|
1195
|
0 |
0 |
if (s/^(\s+)([\w:]+)(\t+)//) { } |
|
1199
|
0 |
0 |
if ($dest) |
|
1226
|
22 |
0 |
if (not $$self{'_begin'}) { } |
|
|
0 |
0 |
elsif ($$self{'_begin'} eq 'html') { } |
|
1229
|
3 |
0 |
if ($$self{'_current_head1_title'} eq 'NAME' and $paragraph and not $self->description) |
|
1235
|
5 |
17 |
if ($$self{'_last_p_by'} and $$self{'_last_p_by'} eq 'dd') { } |
|
|
0 |
17 |
elsif ($$self{'_last_p_by'} and $$self{'_last_p_by'} eq 'beginfor') { } |
|
1274
|
48 |
10 |
unless (ref $_) |
|
1279
|
0 |
0 |
if $nestlist =~ /S/ |
|
1284
|
48 |
0 |
if ($chunk) |
|
1285
|
0 |
48 |
if $nestlist =~ /S/ |
|
1297
|
0 |
10 |
if ($cmd eq 'E') { } |
|
|
2 |
8 |
elsif ($cmd eq 'L') { } |
|
|
2 |
6 |
elsif ($cmd eq 'P') { } |
|
|
2 |
4 |
elsif ($cmd eq 'Q') { } |
|
|
0 |
4 |
elsif ($cmd eq 'B') { } |
|
|
0 |
4 |
elsif ($cmd eq 'C') { } |
|
|
0 |
4 |
elsif ($cmd eq 'F') { } |
|
|
0 |
4 |
elsif ($cmd eq 'I') { } |
|
|
0 |
4 |
elsif ($cmd eq 'S') { } |
|
|
0 |
4 |
elsif ($cmd eq 'Z') { } |
|
|
4 |
0 |
elsif ($cmd eq 'X') { } |
|
1300
|
0 |
0 |
if ($entity =~ /^(0x[0-9a-f]+)$/i) { } |
|
|
0 |
0 |
elsif ($entity =~ /^(0[0-7]+)$/) { } |
|
|
0 |
0 |
elsif ($entity =~ /^(\d+)$/) { } |
|
|
0 |
0 |
elsif ($entity =~ /^sol$/i) { } |
|
|
0 |
0 |
elsif ($entity =~ /^verbar$/i) { } |
|
1331
|
0 |
2 |
unless (defined $link) |
|
1350
|
2 |
0 |
if ($page) { } |
|
1352
|
2 |
0 |
if ($dest) { } |
|
1367
|
0 |
2 |
if ($link->type eq 'hyperlink') { } |
|
1376
|
2 |
0 |
if ($link->node) |
|
1382
|
2 |
0 |
if ($dest and $node) |
|
1384
|
2 |
0 |
if ($id) { } |
|
1389
|
0 |
0 |
$page ? : |
|
1468
|
4 |
0 |
if $$self{-'idxopt'} =~ /(^|,)x(,|$)/i |
|
1481
|
38 |
8 |
unless defined $_[0]{$_[1]} |
|
1520
|
3 |
16 |
if ($node =~ /^(\S+)\s+\S/) |
|
1521
|
3 |
0 |
unless defined $Node{$1} |
|
1542
|
3 |
21 |
unless $id |
|
1559
|
17 |
0 |
if $suffix |
|
1580
|
0 |
0 |
if ($doit and $$self{-'lib'} and $node_ref = $$self{-'lib'}{$text} and not $$node_ref[0] eq $$self{-'name'} && $$node_ref[1] eq $$self{'_current_anchor'}) |
|
1601
|
0 |
0 |
if ($1 eq ' ') { } |
|
1607
|
0 |
0 |
unless $len |
|
1618
|
3 |
0 |
if (defined $$self{'_toc'}) |
|
1660
|
0 |
0 |
if $head and $head->content |
|
1663
|
0 |
0 |
if $body and $body->content |
|
1671
|
0 |
0 |
if ($node->tag eq 'p') |
|
1674
|
0 |
0 |
if (ref $$_ and $$_->tag eq 'p') |
|
1678
|
0 |
0 |
if (@rest) { } |
|
1699
|
0 |
8 |
if (ref $_) { } |
|
1712
|
5 |
0 |
if defined $$self{'_html'} |