line |
true |
false |
branch |
50
|
2 |
189 |
if ($instr eq '') |
58
|
3 |
9 |
$1 eq 't' ? : |
|
0 |
12 |
$1 eq 'n' ? : |
|
18 |
12 |
$1 eq '\\' ? : |
63
|
59 |
130 |
if ($code eq '(') { } |
|
27 |
103 |
elsif ($code eq 'A') { } |
|
10 |
93 |
elsif ($code eq '?') { } |
|
7 |
86 |
elsif ($code eq '!') { } |
|
59 |
27 |
elsif ($code eq ')') { } |
|
22 |
5 |
elsif ($code eq '-') { } |
|
4 |
1 |
elsif ($code eq '#') { } |
71
|
1 |
26 |
unless (defined $key and defined $val) |
79
|
1 |
9 |
unless (defined $intro and defined $def) |
84
|
6 |
3 |
if ($intro =~ /\A xml/imsx and not $intro =~ /\A xml-stylesheet \z/imsx) { } |
88
|
2 |
5 |
if ($key =~ /\A version \z/imsx) { } |
|
4 |
1 |
elsif ($key =~ /\A encoding \z/imsx) { } |
|
0 |
1 |
elsif ($key =~ /\A standalone \z/imsx) { } |
95
|
3 |
3 |
unless (defined $version) |
96
|
1 |
5 |
unless ($version eq '1.0') |
110
|
1 |
6 |
unless (defined $intro and defined $def) |
115
|
4 |
2 |
if ($def =~ /\A PUBLIC/imsx) { } |
|
1 |
1 |
elsif ($def =~ /\A SYSTEM/imsx) { } |
117
|
1 |
3 |
unless (defined $public and defined $system) |
125
|
1 |
0 |
unless (defined $system) |
149
|
59 |
115 |
if ($$self{'PYX_TYPE'} eq '(') |