| line |
true |
false |
branch |
|
25
|
0 |
0 |
if ($catfiles =~ /;/) { } |
|
43
|
0 |
0 |
if defined $val |
|
53
|
0 |
0 |
if defined $val |
|
62
|
0 |
0 |
if $$self{'FILES'}{$file} |
|
76
|
0 |
0 |
if $hash{'TYPE'} = $type && $hash{$type} eq $key |
|
103
|
0 |
0 |
if $key ne 'PUBID' |
|
110
|
0 |
0 |
if $hash{'FILE'} eq $filename |
|
123
|
0 |
0 |
if $hash{'TYPE'} eq 'DTDDECL' and $hash{'DTDDECL'} eq $pubid |
|
126
|
0 |
0 |
if $hash{'TYPE'} eq 'SGMLDECL' |
|
142
|
0 |
0 |
if $self->verbose |
|
145
|
0 |
0 |
if $catalog =~ m[^(.*)/[^/]+$] |
|
146
|
0 |
0 |
if substr($dir, 1, 1) eq ':' |
|
148
|
0 |
0 |
unless (open F, $catalog) |
|
149
|
0 |
0 |
if $self->verbose |
|
160
|
0 |
0 |
if ($keyword eq 'OVERRIDE') |
|
166
|
0 |
0 |
if ($keyword eq 'PUBLIC') |
|
168
|
0 |
0 |
if (/^\s*[\"\']/s) { } |
|
176
|
0 |
0 |
if (/^\s*[\"\']/s) { } |
|
184
|
0 |
0 |
if ($filename =~ /^[a-z]:/s) { } |
|
|
0 |
0 |
elsif ($filename =~ m[^[\\/]]) { } |
|
189
|
0 |
0 |
if $dir ne '' |
|
203
|
0 |
0 |
if ($keyword eq 'SYSTEM') |
|
205
|
0 |
0 |
if (/^\s*[\"\']/s) { } |
|
213
|
0 |
0 |
if (/^\s*[\"\']/s) { } |
|
221
|
0 |
0 |
if ($filename =~ /^[a-z]:/s) { } |
|
|
0 |
0 |
elsif ($filename =~ m[^[\\/]]) { } |
|
226
|
0 |
0 |
if $dir ne '' |
|
238
|
0 |
0 |
if ($keyword eq 'DTDDECL') |
|
240
|
0 |
0 |
if (/^\s*[\"\']/s) { } |
|
248
|
0 |
0 |
if (/^\s*[\"\']/s) { } |
|
256
|
0 |
0 |
if ($filename =~ /^[a-z]:/s) { } |
|
|
0 |
0 |
elsif ($filename =~ m[^[\\/]]) { } |
|
261
|
0 |
0 |
if $dir ne '' |
|
273
|
0 |
0 |
if ($keyword eq 'SGMLDECL') |
|
276
|
0 |
0 |
if (/^\s*[\"\']/s) { } |
|
284
|
0 |
0 |
if ($filename =~ /^[a-z]:/s) { } |
|
|
0 |
0 |
elsif ($filename =~ m[^[\\/]]) { } |
|
289
|
0 |
0 |
if $dir ne '' |
|
301
|
0 |
0 |
if ($keyword eq 'DOCTYPE') |
|
303
|
0 |
0 |
if (/^\s*[\"\']/s) { } |
|
311
|
0 |
0 |
if (/^\s*[\"\']/s) { } |
|
319
|
0 |
0 |
if ($filename =~ /^[a-z]:/s) { } |
|
|
0 |
0 |
elsif ($filename =~ m[^[\\/]]) { } |
|
324
|
0 |
0 |
if $dir ne '' |
|
331
|
0 |
0 |
if ($keyword =~ /^\-\-/) |
|
346
|
0 |
0 |
if $hash{'TYPE'} eq 'SGMLDECL' |
|
352
|
0 |
0 |
if $hash{'TYPE'} ne 'SGMLDECL' |
|
371
|
0 |
0 |
if ($entity =~ /^\s*\"/s) { } |
|
|
0 |
0 |
elsif ($entity =~ /^\s*\'/s) { } |
|
372
|
0 |
0 |
unless $entity =~ /^\s*\"(.*?)\"/s |
|
376
|
0 |
0 |
unless $entity =~ /^\s*\'(.*?)\'/s |