Branch Coverage

blib/lib/Astro/ADS/Query.pm
Criterion Covered Total %
branch 109 154 70.7


line true false branch
78 1 12 if @_ > 1
158 0 5 unless defined $$self{'BUFFER'}
182 0 3 unless @_
191 0 3 unless defined $$self{'BUFFER'}
213 2 7 if (@_)
238 1 1 if (@_)
268 1 2 if (@_)
273 1 0 if (defined $base_url)
294 7 5 if (defined $string) { }
322 2 3 if (@_)
337 2 4 if ($i eq 0) { }
351 2 3 wantarray ? :
370 2 0 if (@_)
373 0 0 if ($logic eq 'OR' or $logic eq 'AND' or $logic eq 'SIMPLE' or $logic eq 'BOOL' or $logic eq 'FULLMATCH')
397 3 1 if (@_)
412 3 7 if ($i eq 0) { }
446 2 0 if (@_)
449 0 0 if ($logic eq 'OR' or $logic eq 'AND' or $logic eq 'SIMPLE' or $logic eq 'BOOL' or $logic eq 'FULLMATCH')
473 2 0 if (@_)
497 1 1 if (@_)
521 1 1 if (@_)
545 1 1 if (@_)
569 1 1 if (@_)
598 0 0 if (@_)
602 0 0 if ($source eq 'REFEREED') { }
0 0 elsif ($source eq 'OTHER') { }
712 4 5 unless @_
722 5 60 if exists $args{$key}
777 5 0 if (${$reply;}{'_rc'} eq 200) { }
0 0 elsif (${$reply;}{'_rc'} eq 500) { }
795 0 0 if ($buffer[$line] =~ /No reference selected/)
804 0 0 if ($error_flag)
807 0 0 if ($proxy_string = $ua->proxy('http')) { }
816 0 0 if ($proxy_string = $ua->proxy('http')) { }
865 3 0 if (${$reply;}{'_rc'} eq 200) { }
871 0 0 if ($proxy_string = $ua->proxy('http')) { }
919 1 10212 if ($buffer[$line] =~ /Retrieved 0 abstracts/)
927 0 10213 if ($buffer[$line] =~ /No reference selected/)
934 232 9981 if (substr($buffer[$line], 0, 2) eq '%R')
956 3477 6459 if (substr($buffer[$counter], 0, 1) eq '%')
964 309 9627 if ($tag eq 'T')
967 231 78 if (substr($buffer[$counter], 0, 1) eq '%') { }
982 372 9564 if ($tag eq 'A')
985 232 140 if (substr($buffer[$counter], 0, 1) eq '%') { }
1000 1241 8695 if ($tag eq 'F')
1003 164 1077 if (substr($buffer[$counter], 0, 1) eq '%') { }
1018 366 9570 if ($tag eq 'J')
1021 232 134 if (substr($buffer[$counter], 0, 1) eq '%') { }
1036 232 9704 if ($tag eq 'D')
1039 232 0 if (substr($buffer[$counter], 0, 1) eq '%') { }
1054 332 9604 if ($tag eq 'K')
1057 157 175 if (substr($buffer[$counter], 0, 1) eq '%') { }
1072 232 9704 if ($tag eq 'G')
1075 232 0 if (substr($buffer[$counter], 0, 1) eq '%') { }
1090 1601 8335 if ($tag eq 'I')
1093 284 1317 if (substr($buffer[$counter], 0, 1) eq '%') { }
1108 232 9704 if ($tag eq 'U')
1111 232 0 if (substr($buffer[$counter], 0, 1) eq '%') { }
1126 3 9933 if ($tag eq 'O')
1129 3 0 if (substr($buffer[$counter], 0, 1) eq '%') { }
1144 3505 6431 if ($tag eq 'B')
1147 232 3273 if (substr($buffer[$counter], 0, 1) eq '%') { }
1162 232 9704 if ($tag eq 'S')
1165 232 0 if (substr($buffer[$counter], 0, 1) eq '%') { }
1194 231 1 if defined $title[0]
1208 232 0 if defined $authors[0]
1222 164 68 if defined $affil[0]
1232 232 0 if defined $journal[0]
1242 232 0 if defined $pubdate[0]
1256 156 76 if defined $keywords[0]
1266 232 0 if defined $origin[0]
1280 232 0 if defined $links[0]
1292 232 0 if defined $url[0]
1302 3 229 if defined $object[0]
1311 232 0 if defined $abstract[0]
1321 232 0 if defined $score[0]
1331 232 9981 if defined $paper