Branch Coverage

blib/lib/Net/Amazon/Recommended.pm
Criterion Covered Total %
branch 1 62 1.6


line true false branch
19 1 0 unless exists $args{'email'} and exists $args{'password'}
86 0 0 unless $mech->login
90 0 0 @_ >= 3 ? :
92 0 0 exists $format{$$self{'_DOMAIN'}} ? :
97 0 0 if (defined $content) { }
102 0 0 unless defined $content
103 0 0 if $content =~ /$NOTFOUND_REGEX/
106 0 0 if $url =~ /\b(rGroup|nodeId)\b/ and $$source{'category'} eq ''
117 0 0 if ($price =~ m[([^<]*)])
120 0 0 if ($price =~ m[([^<]*)])
123 0 0 if ($price =~ m[([^<]*)])
130 0 0 if defined $date
132 0 0 if defined $date
145 0 0 unless $mech->login
149 0 0 @_ >= 3 ? :
153 0 0 if (defined $content) { }
158 0 0 unless defined $content
181 0 0 unless $mech->login
185 0 0 unless $content =~ //
186 0 0 unless exists $$source{'values'}
217 0 0 unless $mech->login
226 0 0 if (exists $PARAM{$key})
244 0 0 if (lc $type eq 'login')
268 0 0 if (not defined $$self{'_IS_LOGIN'} or $$self{'_IS_LOGIN'} + 600 < time)
271 0 0 if ($mech->content =~ /'config.signOutText',\n null/) { }
283 0 0 if $self->is_login
300 0 0 unless $self->login
309 0 0 if ($mech->content =~ m[]) { }
0 0 elsif (defined eval { do { $mech->follow_link('url_regex', qr/pd_ys_next_\d+\?/) } }) { }
325 0 0 unless $self->login
327 0 0 if $_[1] eq 'session-id'