| line |
true |
false |
branch |
|
15
|
3 |
0 |
unless defined &Pod::Simple::RTF::DEBUG |
|
21
|
0 |
270 |
if $] ge "5.007003" and Deparse error: Can't locate object method "object_2svref" via package "B::SPECIAL" at /usr/local/lib/perl5/5.26.1/B/Deparse.pm line 5018. |
|
77
|
0 |
72 |
unless /^([-A-Za-z]+)=(\w[^\=]*)$/s |
|
162
|
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 ? : |
|
196
|
0 |
3 |
if $self->bare_output |
|
218
|
3 |
0 |
unless defined $self->{'rtfindent'} |
|
222
|
19 |
44 |
if (($type = $token->type) eq 'text') { } |
|
|
22 |
22 |
elsif ($type eq 'start') { } |
|
|
22 |
0 |
elsif ($type eq 'end') { } |
|
223
|
1 |
18 |
if ($self->{'rtfverbatim'}) |
|
235
|
18 |
0 |
unless $self->{'no_proofing_exemptions'} |
|
255
|
18 |
0 |
if $WRAP |
|
271
|
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') { } |
|
276
|
0 |
1 |
unless defined $next |
|
278
|
1 |
0 |
if ($next->type eq "text") |
|
281
|
1 |
14 |
if ++$line_count > 15 |
|
286
|
1 |
0 |
$line_count > 15 ? : |
|
299
|
0 |
0 |
unless defined $to_unget[-1] |
|
303
|
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) { } |
|
304
|
0 |
0 |
if (($text_count_here += length ${$to_unget[-1]->text_r;}) > 150) |
|
313
|
0 |
0 |
if $to_unget[-1]->type eq "start" and $to_unget[-1]->tagname eq "Para" |
|
346
|
0 |
0 |
unless defined $next |
|
347
|
0 |
0 |
unless ($next->type eq "text") |
|
356
|
3 |
19 |
unless defined($scratch = $self->{'Tagmap'}{$tagname}) |
|
360
|
0 |
19 |
if ($tagname eq 'item-number') { } |
|
|
0 |
19 |
elsif ($tagname eq 'item-bullet') { } |
|
369
|
0 |
22 |
if (($tagname = $token->tagname) =~ /^over-/s) { } |
|
|
1 |
21 |
elsif ($tagname eq 'Verbatim' or $tagname eq 'VerbatimFormatted') { } |
|
376
|
3 |
19 |
unless defined($scratch = $self->{'Tagmap'}{"/$tagname"}) |
|
478
|
0 |
3 |
unless ($class eq "Pod::Simple::RTF") |
|
480
|
0 |
0 |
if defined $self->VERSION |
|
505
|
3 |
0 |
if length $title |
|
513
|
0 |
3 |
if $title =~ /^\S+$/s and $title =~ /::/s |
|
520
|
0 |
3 |
if $is_obviously_module_name |
|
558
|
22 |
0 |
if $question_mark_code_points |
|
562
|
67 |
2 |
ord $1 < 32768 ? : |
|
|
22 |
0 |
if $plane0 |
|
566
|
22 |
0 |
if $other_unicode |
|
573
|
21 |
1 |
shift() ? : |
|
584
|
19 |
3 |
if (not defined wantarray) { } |
|
|
0 |
3 |
elsif (wantarray) { } |
|
597
|
3 |
0 |
@_ == 1 ? : |