Branch Coverage

blib/lib/Net/Amazon/Recommended.pm
Criterion Covered Total %
branch 1 58 1.7


line true false branch
19 1 0 unless exists $args{'email'} and exists $args{'password'}
80 0 0 unless $mech->login
84 0 0 @_ >= 3 ? :
86 0 0 exists $format{$$self{'_DOMAIN'}} ? :
91 0 0 if (defined $content) { }
96 0 0 unless defined $content
97 0 0 if $content =~ /$NOTFOUND_REGEX/
100 0 0 if $url =~ /\b(rGroup|nodeId)\b/ and $$source{'category'} eq ''
111 0 0 if ($price =~ m[([^<]*)])
114 0 0 if ($price =~ m[([^<]*)])
117 0 0 if ($price =~ m[([^<]*)])
124 0 0 if defined $date
126 0 0 if defined $date
139 0 0 unless $mech->login
143 0 0 @_ >= 3 ? :
147 0 0 if (defined $content) { }
152 0 0 unless defined $content
175 0 0 unless $mech->login
179 0 0 unless exists $$source{'values'}
210 0 0 unless $mech->login
219 0 0 if (exists $PARAM{$key})
257 0 0 if defined $value
264 0 0 if $self->is_login
275 0 0 unless $mech->content =~ /\Q$url\E/
284 0 0 unless $self->login
293 0 0 if ($mech->content =~ m[]) { }
0 0 elsif (defined eval { do { $mech->follow_link('url_regex', qr/pd_ys_next/) } }) { }
309 0 0 unless $self->login
311 0 0 if $_[1] eq 'session-id'