| line |
true |
false |
branch |
|
15
|
3 |
0 |
unless defined &Pod::Simple::RTF::DEBUG |
|
21
|
0 |
270 |
if "$]" >= "5.007003" and Deparse error: Can't locate object method "object_2svref" via package "B::SPECIAL" at /usr/local/lib/perl5/5.42.0/B/Deparse.pm line 5762. |
|
77
|
0 |
75 |
unless /^([-A-Za-z]+)=(\w[^\=]*)$/s |
|
163
|
0 |
3 |
($ENV{'RTFDEFLANG'} || '') =~ /^([a-fA-F0-9]{4})$/s ? : |
|
|
0 |
3 |
($ENV{'RTFDEFLANG'} || '') =~ /^0?x([a-fA-F0-9]{1,10})$/s ? : |
|
|
0 |
3 |
($ENV{'RTFDEFLANG'} || '') =~ /^(\d{1,10})$/s ? : |
|
197
|
0 |
3 |
if $self->bare_output |
|
219
|
3 |
0 |
unless defined $self->{'rtfindent'} |
|
223
|
19 |
44 |
if (($type = $token->type) eq 'text') { } |
|
|
22 |
22 |
elsif ($type eq 'start') { } |
|
|
22 |
0 |
elsif ($type eq 'end') { } |
|
224
|
1 |
18 |
if ($self->{'rtfverbatim'}) |
|
236
|
18 |
0 |
unless $self->{'no_proofing_exemptions'} |
|
256
|
18 |
0 |
if $WRAP |
|
272
|
1 |
21 |
if (($tagname = $token->tagname) eq 'Verbatim' or $tagname eq 'VerbatimFormatted') { } |
|
|
0 |
21 |
elsif ($tagname =~ /^item-/s) { } |
|
|
0 |
21 |
elsif ($tagname =~ /^over-/s) { } |
|
|
0 |
21 |
elsif ($tagname eq 'L') { } |
|
|
0 |
21 |
elsif ($tagname eq 'Data') { } |
|
277
|
0 |
1 |
unless defined $next |
|
279
|
1 |
0 |
if ($next->type eq "text") |
|
282
|
1 |
14 |
if ++$line_count > 15 |
|
287
|
1 |
0 |
$line_count > 15 ? : |
|
300
|
0 |
0 |
unless defined $to_unget[-1] |
|
304
|
0 |
0 |
if ($to_unget[-1]->type eq 'text') { } |
|
|
0 |
0 |
elsif (@to_unget > 1 and $to_unget[-2]->type eq 'end' and $to_unget[-2]->tagname =~ /^item-/s) { } |
|
|
0 |
0 |
elsif (@to_unget > 40) { } |
|
305
|
0 |
0 |
if (($text_count_here += length ${$to_unget[-1]->text_r;}) > 150) |
|
314
|
0 |
0 |
if $to_unget[-1]->type eq "start" and $to_unget[-1]->tagname eq "Para" |
|
347
|
0 |
0 |
unless defined $next |
|
348
|
0 |
0 |
unless ($next->type eq "text") |
|
357
|
3 |
19 |
unless defined($scratch = $self->{'Tagmap'}{$tagname}) |
|
361
|
0 |
19 |
if ($tagname eq 'item-number') { } |
|
|
0 |
19 |
elsif ($tagname eq 'item-bullet') { } |
|
370
|
0 |
22 |
if (($tagname = $token->tagname) =~ /^over-/s) { } |
|
|
1 |
21 |
elsif ($tagname eq 'Verbatim' or $tagname eq 'VerbatimFormatted') { } |
|
377
|
3 |
19 |
unless defined($scratch = $self->{'Tagmap'}{"/$tagname"}) |
|
480
|
0 |
3 |
unless ($class eq __PACKAGE__) |
|
482
|
0 |
0 |
if defined $self->VERSION |
|
507
|
3 |
0 |
if length $title |
|
515
|
0 |
3 |
if $title =~ /^\S+$/s and $title =~ /::/s |
|
522
|
0 |
3 |
if $is_obviously_module_name |
|
560
|
22 |
0 |
if $question_mark_code_points |
|
564
|
67 |
2 |
ord $1 < 32768 ? : |
|
|
22 |
0 |
if $plane0 |
|
568
|
22 |
0 |
if $other_unicode |
|
575
|
21 |
1 |
shift() ? : |
|
586
|
19 |
3 |
if (not defined wantarray) { } |
|
|
0 |
3 |
elsif (wantarray) { } |
|
599
|
3 |
0 |
@_ == 1 ? : |