Branch Coverage

blib/lib/Image/Grab.pm
Criterion Covered Total %
branch 41 86 47.6


line true false branch
54 4 7 if (@_)
58 0 5 unless exists $$self{'_permitted'}{lc $_}
74 0 274 unless my $type = ref $self
80 0 274 unless (exists $$self{'_permitted'}{$name})
84 63 211 if (@_) { }
85 126 elsif (defined $$self{$name}) { }
86 0 63 if $self->debug
99 0 0 unless my $type = ref $self
102 0 0 if ($#_ == 2)
112 0 3 unless my $type = ref $self
124 3 0 if defined $self->search_url and defined $self->do_posix
126 0 3 unless defined $self->search_url
136 0 3 if ($count == $times and not $req->is_success)
157 0 0 unless my $type = ref $self
167 0 8 unless my $type = ref $self
178 7 1 if (defined $self->url)
179 7 0 if defined $self->do_posix
183 1 0 if defined $self->regexp and defined $self->do_posix
187 0 1 unless @link
190 1 0 if ($self->regexp or $self->index)
195 1 0 unless defined $self->index
197 3 0 if defined $_
199 1 0 if @match
209 0 11 unless my $type = ref $self
213 0 11 if ($self->cookiefile and not -f $self->cookiefile) { }
0 22 elsif ($self->cookiefile and not defined $self->cookiejar) { }
231 5 3 if (ref $self) { }
232 0 5 if (my $c = shift())
236 1 2 if ($self eq 'Image::Grab') { }
253 0 8 unless defined $url
254 0 8 if $self->debug
258 1 7 if defined $self->refer
259 0 8 if ($self->cookiejar)
268 0 8 if $self->debug
273 0 8 unless $rc->is_success
275 0 8 if $self->debug
281 8 0 if ($$self{'have_DigestMD5'}) { }
0 0 elsif ($$self{'have_MD5'}) { }
295 0 0 unless my $type = ref $self
299 0 0 unless defined $self->date or defined $self->md5
311 0 0 if defined $self->date and $self->date >= $tmp->date
313 0 0 if defined $self->md5 and $self->md5 eq $tmp->md5
316 0 0 if $grab_new