| line |
true |
false |
branch |
|
13
|
0 |
2 |
if grep(($_ eq 'parseXML'), @_) |
|
20
|
0 |
2 |
unless ref $rr eq 'HASH' |
|
21
|
0 |
2 |
unless ref $cref eq 'SCALAR' |
|
24
|
0 |
2 |
unless $$cref |
|
28
|
1 |
1 |
if index(${$cref;}, '
|
|
29
|
1 |
0 |
if index(${$cref;}, '
|
|
30
|
0 |
0 |
if index(${$cref;}, '
|
|
31
|
0 |
0 |
if index(${$cref;}, '
|
|
60
|
1 |
0 |
if (exists $$rr{'item'}) { } |
|
67
|
0 |
0 |
if (exists $$item{'dc:description'}) |
|
70
|
0 |
0 |
if (exists $$item{'dc:title'}) |
|
73
|
0 |
0 |
if (exists $$item{'dc:identifier'}) |
|
93
|
0 |
0 |
if (exists $$item{'text'}) |
|
96
|
0 |
0 |
if (exists $$item{'linetext'}) |
|
99
|
0 |
0 |
if (exists $$item{'url'}) |
|
120
|
0 |
0 |
if (exists $$item{'url'}) |
|
133
|
0 |
2 |
unless defined $$rr{'items'} |
|
134
|
0 |
2 |
unless ref $$rr{'items'} eq 'ARRAY' |
|
137
|
0 |
26 |
if ref $$i{'description'} |
|
140
|
0 |
26 |
unless ($$i{'link'}) |
|
141
|
0 |
0 |
if (defined $$i{'url'}) { } |
|
|
0 |
0 |
elsif (exists $$i{'title'}) { } |
|
146
|
0 |
0 |
if ($$i{'title'} =~ /^(?:https?|ftp):/) { } |
|
|
0 |
0 |
elsif ($$i{'title'} =~ /"((?:https?|ftp).*?)"/) { } |
|
163
|
0 |
26 |
if (exists $$i{'link'} and not $$i{'link'} =~ m[^(https?|ftp)://]i) |
|
165
|
0 |
0 |
if (ref $$i{'link'} and $$i{'link'}{'a'}{'href'}) { } |
|
|
0 |
0 |
elsif ($$i{'link'} =~ m[^[#/]] and $$rr{'link'} =~ m[^https?://]) { } |
|
169
|
0 |
0 |
if (substr($$i{'link'}, 0, 1) ne '/') |
|
180
|
0 |
26 |
unless (defined $$i{'title'}) |
|
184
|
26 |
0 |
if (exists $$i{'link'}) |
|
203
|
0 |
0 |
if ($comments) |
|
212
|
0 |
2 |
if ($comments) |
|
217
|
0 |
0 |
if (ref $comments eq 'ARRAY') |
|
242
|
21 |
124 |
unless $str =~ m[<\Q$tag\E\s*([^>]*?)?>(.*?)\Q$tag\E>]s |
|
249
|
43 |
102 |
if ($attr) |
|
256
|
32 |
113 |
if ($content and index($content, '<') > -1) |
|
259
|
32 |
0 |
if ($str =~ />[^><]+) |
|
270
|
0 |
32 |
if $content =~ /\S/ |
|
274
|
32 |
113 |
if (ref $inhash) { } |
|
|
21 |
92 |
elsif (ref $attr) { } |
|
276
|
22 |
10 |
if (ref $attr) |
|
280
|
0 |
0 |
ref $$inhash{$_} eq 'ARRAY' ? : |
|
|
0 |
22 |
exists $$inhash{$_} ? : |
|
295
|
40 |
4 |
ref $$hash{$tag} eq 'ARRAY' ? : |
|
|
44 |
101 |
exists $$hash{$tag} ? : |