| line |
true |
false |
branch |
|
224
|
10 |
4 |
if $clean_options{'output'} |
|
250
|
1 |
0 |
if $$self{'_RTF_Control_Options'}{'confdir'} |
|
292
|
0 |
7 |
if ($@) { } |
|
298
|
0 |
0 |
unless open CHAR_MAP, "< $charset_file" |
|
361
|
52 |
0 |
if defined $_[0] |
|
376
|
12 |
15 |
if $_[0] |
|
398
|
49 |
6 |
if (not defined $_[0]) { } |
|
|
6 |
0 |
elsif ($_[0] eq 'nul') { } |
|
451
|
2 |
4 |
if (fileno X) { } |
|
|
4 |
0 |
elsif (ref $_[0] eq 'SCALAR') { } |
|
530
|
0 |
0 |
if ref $_[0] |
|
558
|
0 |
0 |
if (defined $arg and $_[2] eq '0') { } |
|
|
0 |
0 |
elsif ($_[3] eq 'start') { } |
|
|
0 |
0 |
elsif (defined $arg and $_[2] eq '1') { } |
|
|
0 |
0 |
elsif ($_[3] eq 'end') { } |
|
582
|
0 |
0 |
if (length $string > 30) |
|
605
|
0 |
0 |
if ($_[3] eq 'start') { } |
|
669
|
0 |
8 |
unless (%char_props) |
|
710
|
1 |
4 |
if $IN_STYLESHEET or $IN_FONTTBL |
|
722
|
24 |
0 |
unless $value |
|
726
|
0 |
0 |
if (defined(my $action = $RTF::Control::do_on_event{$char_prop})) |
|
752
|
6 |
26 |
if $IN_STYLESHEET or $IN_FONTTBL |
|
754
|
6 |
20 |
unless $char_prop_change |
|
767
|
23 |
97 |
defined $prop ? : |
|
772
|
14 |
106 |
if ($prop != $value) |
|
775
|
14 |
0 |
if (defined(my $action = $RTF::Control::do_on_event{$char_prop})) |
|
779
|
7 |
7 |
$value == 1 ? : |
|
814
|
0 |
11 |
if $IN_STYLESHEET or $IN_FONTTBL |
|
823
|
2 |
9 |
if (defined $_[2] and $_[2] eq '0') { } |
|
|
9 |
0 |
elsif ($_[3] eq 'start') { } |
|
881
|
0 |
0 |
if $_[2] |
|
900
|
0 |
0 |
if $@ |
|
908
|
0 |
0 |
unless /\S/ |
|
911
|
0 |
0 |
if (not defined($hexa = $RTF::Control::charset{$name})) { } |
|
924
|
0 |
0 |
if $@ |
|
991
|
9 |
0 |
if (defined(my $action = $RTF::Control::do_on_event{'document'})) |
|
1022
|
9 |
0 |
if (defined(my $action = $RTF::Control::do_on_event{'document'})) |
|
1095
|
0 |
0 |
if (defined(my $char = $RTF::Control::charset{$_[1]})) { } |
|
1105
|
0 |
0 |
if (defined(my $sym = $RTF::Control::symbol{$_[1]})) { } |
|
1151
|
3 |
3 |
if ($_[3] eq 'start') { } |
|
1247
|
3 |
0 |
if ($_[3] eq 'start') { } |
|
1311
|
0 |
3 |
if ($IN_FONTTBL) { } |
|
|
0 |
3 |
elsif ($IN_STYLESHEET) { } |
|
1313
|
0 |
0 |
if ($_[3] eq 'start') { } |
|
1337
|
3 |
3 |
if ($fontname =~ s/\s*;$//) { } |
|
1361
|
0 |
0 |
if $styledef |
|
1364
|
6 |
3 |
if ($_[3] eq 'start') { } |
|
1375
|
0 |
0 |
if ($stylename =~ s/\s*;$//) { } |
|
1394
|
3 |
0 |
if $styledef |
|
1401
|
0 |
0 |
unless $stylename |
|
1403
|
0 |
0 |
if ($cstylename ne $stylename) |
|
1405
|
0 |
0 |
if (defined(my $action = $RTF::Control::do_on_event{'style_change'})) |
|
1671
|
0 |
4 |
if ($IN_TABLE and not $RTF::Control::par_props{'intbl'}) { } |
|
1679
|
0 |
0 |
if (defined(my $action = $RTF::Control::do_on_event{'cell'})) |
|
1689
|
0 |
0 |
if (defined(my $action = $RTF::Control::do_on_event{'row'})) |
|
1699
|
0 |
4 |
if (defined(my $action = $RTF::Control::do_on_event{'table'})) |
|
1719
|
0 |
0 |
if (defined $cstylename and $cstylename ne '') { } |
|
1732
|
4 |
0 |
if ($RTF::Control::par_props{'intbl'}) { } |
|
|
0 |
0 |
elsif (defined(my $action = $RTF::Control::do_on_event{$RTF::Control::style})) { } |
|
1736
|
0 |
0 |
if (defined(my $action = $RTF::Control::do_on_event{$RTF::Control::style})) { } |
|
|
0 |
4 |
elsif (defined($action = $RTF::Control::do_on_event{'par'})) { } |
|
1928
|
0 |
8 |
if (@control) |
|
1936
|
0 |
8 |
if ($RTF::Control::LOG_FILE) |
|
1938
|
0 |
0 |
unless (open LOG, "> $RTF::Control::LOG_FILE") |