Branch Coverage

lib/Test/WWW/Mechanize/Driver.pm
Criterion Covered Total %
branch 65 78 83.3


line true false branch
104 0 10 if defined $invalid
125 1 17 if HAS($x, 'load') and not ref $x->{'load'}
145 28 18 unless $x->{'groups'}
160 1 2 unless $x->{'groups'}
174 7 3 unless $x->{'_loaded'}
175 1 9 unless $x->{'groups'}
190 88 0 if $x->{'mechanize'}
207 7 2 unless $Test->expected_tests
223 3 18 if ($group->{'SKIP'})
246 2 16 $group->{'parameters'} ? :
249 16 2 if (uc $method eq 'GET') { }
2 0 elsif (uc $method eq 'POST') { }
258 2 16 if $x->{'after_response'}
281 1 48 if ($test->{'sub'})
300 0 18 unless HAS($x, 'load') and 'ARRAY' eq ref $x->{'load'}
303 0 10 if $x->{'_loaded'}{$file}++
306 0 10 if $@ or not @docs
327 3 14 if (not ref $doc) { }
4 10 elsif ('HASH' eq ref $doc) { }
10 0 elsif ('ARRAY' eq ref $doc) { }
420 3 82 if ($_ eq 'actions') { }
35 47 elsif (TRUE(\%config_options, $_) or TRUE(\%config_aliases, $_)) { }
35 12 elsif (TRUE(\%scalar_tests, $_) or TRUE(\%bool_tests, $_) or TRUE(\%kv_tests, $_) or TRUE(\%hash_tests, $_) or TRUE(\%mech_action, $_) or TRUE(\%aliases, $_) or $x->mechanize->can($_)) { }
432 6 29 if TRUE(\%config_aliases, $_) and not HAS($group, $config_aliases{$_})
452 12 9 if $x->{'base'}
476 18 26 if HAS(\%aliases, $a->{'name'})
503 34 10 if (TRUE(\%scalar_tests, $name))
504 0 42 $name =~ /_like$/ ? :
16 18 'ARRAY' eq ref $args ? :
510 6 4 if (TRUE(\%kv_tests, $name))
513 0 6 $name =~ /(?:_|_un)like$/ ? :
523 2 2 if (TRUE(\%hash_tests, $name))
532 1 1 if (TRUE(\%bool_tests, $name))
539 1 0 if (TRUE(\%mech_action, $name))
543 1 0 'HASH' eq ref $args ? :
0 1 'ARRAY' eq ref $args ? :
552 0 1 if $@
576 16 53 if defined $group->{'description'}
579 51 18 if @id