| line |
true |
false |
branch |
|
103
|
0 |
5 |
if ref $this |
|
112
|
1 |
0 |
if ($key =~ /^on_(\w+)$/imsx) { } |
|
|
0 |
0 |
elsif ($key =~ /^(?:=(\w+)|(\w)<>)$/msx) { } |
|
136
|
0 |
48 |
if (exists $OPTS{$pod}) |
|
144
|
0 |
48 |
if (@args & 1) |
|
152
|
0 |
164 |
unless (exists $OPTS{$key}) |
|
158
|
1 |
47 |
if (exists $args{'output'}) |
|
162
|
4 |
44 |
unless (exists $args{'no_css'}) |
|
163
|
7 |
41 |
unless (exists $args{'no_generator'}) |
|
164
|
38 |
10 |
unless (exists $args{'no_index'}) |
|
165
|
46 |
2 |
unless (exists $args{'only_content'}) |
|
180
|
0 |
48 |
if (exists $args{'parserwarn'}) |
|
191
|
10 |
38 |
if (exists $args{'index_item'}) |
|
193
|
3 |
7 |
exists $args{'index_length'} ? : |
|
205
|
2 |
46 |
if (ref $pod eq 'GLOB') { } |
|
206
|
2 |
0 |
unless (defined $title) |
|
209
|
0 |
46 |
if (not -e $pod and $pod ne '-') |
|
213
|
0 |
46 |
unless (defined $title) |
|
214
|
0 |
0 |
$pod eq '-' ? : |
|
|
0 |
0 |
defined $save ? : |
|
220
|
46 |
2 |
if (defined $do_content) |
|
224
|
6 |
40 |
if (defined $do_generator) |
|
234
|
3 |
43 |
if (defined $do_css) |
|
243
|
2 |
46 |
if (exists $args{'top'}) |
|
247
|
1 |
1 |
if (-e $args{'top'}) { } |
|
262
|
0 |
7 |
if (exists $$this{'TITLE'} and length $$this{'TITLE'} > 0 and not exists $args{'title'} and defined $title_line_ref) |
|
270
|
38 |
10 |
if (defined $do_index) |
|
276
|
2 |
46 |
defined $args{'only_content'} ? : |
|
281
|
1 |
47 |
if (defined $save) { } |
|
282
|
0 |
1 |
unless open my $out, '>', $save |
|
283
|
0 |
1 |
unless print {$out;} @html |
|
284
|
0 |
1 |
unless close $out |
|
287
|
0 |
0 |
unless print @html |
|
|
0 |
47 |
if ($pod eq '-') |
|
290
|
46 |
2 |
wantarray ? : |
|
300
|
1 |
37 |
if (defined $add) |
|
301
|
19 |
18 |
if (@{$$this{'INDEX'};} == 0) |
|
316
|
35 |
16 |
if ($level) { } |
|
317
|
3 |
32 |
if ($doing_item) |
|
336
|
9 |
7 |
unless ($doing_item) |
|
370
|
7 |
12 |
if (not exists $$this{'TITLE'} and $txt =~ /\ANAME/msx) |
|
372
|
5 |
2 |
if (defined $title) { } |
|
394
|
0 |
19 |
unless (defined $txt) |
|
401
|
1 |
18 |
if (exists $$this{'UPARROW'}) |
|
410
|
1 |
17 |
if (exists $$this{'UPARROW_FILE'}) |
|
454
|
1 |
1 |
if (length $txt == 0) |
|
470
|
25 |
17 |
if ($type eq 'pod') |
|
471
|
16 |
9 |
defined $section ? : |
|
476
|
19 |
6 |
if (defined $name) |
|
483
|
4 |
13 |
if ($type eq 'man') |
|
486
|
1 |
3 |
unless ($inferred =~ /\Q$name\E/msx) |
|
489
|
13 |
0 |
if ($type eq 'url') |
|
519
|
0 |
11 |
if ($txt =~ /^\d+$/msx) |
|
544
|
0 |
208 |
if exists $$this{'IN_BEGIN'} |
|
553
|
204 |
4 |
unless (length $txt) |
|
554
|
0 |
4 |
if (exists $$this{'IN_ITEM'}) |
|
563
|
0 |
107 |
if (exists $$this{'IN_BEGIN'}) |
|
564
|
6 |
101 |
if (exists $$this{'IN_ITEM'}) |
|
581
|
6 |
33 |
if (length $txt == 1 and not $txt =~ /\d/msx) |
|
603
|
0 |
0 |
!($uri =~ /^(?:mailto|telnet|ssh|irc):/imsx) ? : |
|
618
|
0 |
2 |
unless (defined $this) |
|
632
|
0 |
2 |
unless (defined $this) |
|
646
|
0 |
2 |
unless (defined $this) |
|
659
|
0 |
1 |
unless (defined $this) |