| line |
true |
false |
branch |
|
22
|
0 |
1 |
if @_ & 1 |
|
46
|
0 |
1 |
unless $uri =~ m[^https?://] |
|
50
|
1 |
0 |
if ($response->is_success) { } |
|
75
|
0 |
1 |
if (my($pre_text) = $content =~ /(.+)(?=
|
|
76
|
0 |
0 |
if (my $xml_count = $pre_text =~ s/<\?xml[^>]+?\?>//gi) |
|
83
|
1 |
0 |
if (my($doctype_string) = $content =~ /(]+>)/i) { } |
|
|
0 |
0 |
elsif ($self->raw) { } |
|
87
|
0 |
1 |
if $self->raw |
|
90
|
1 |
0 |
if ($doctype_string =~ s[^
|
|
95
|
0 |
1 |
unless (defined $type) |
|
100
|
1 |
0 |
if $type =~ /^HTML 4.01$/i |
|
104
|
1 |
0 |
if (my($dtd_uri) = $doctype_string =~ /\s"(\S+)"\s*>$/) |
|
108
|
1 |
0 |
if (exists $$dtd_uris{$type}) { } |
|
109
|
1 |
0 |
if ($$dtd_uris{$type} eq $dtd_uri) { } |
|
131
|
1 |
0 |
if ($parse_result{'has_doctype'}) { } |
|
133
|
0 |
1 |
if $parse_result{'xml_prolog'} |
|
136
|
0 |
1 |
if $parse_result{'non_white_space'} |
|
185
|
0 |
0 |
if ($is_net) { } |