Branch Coverage

blib/lib/Net/OAI/Base.pm
Criterion Covered Total %
branch 24 38 63.1


line true false branch
70 0 11 if exists $self->{'responseDate'}
71 11 0 if exists $self->{'error'}{'_responseDate'}
97 9 1 if (wantarray) { }
98 0 9 if (exists $self->{'requestContent'}) { }
9 0 elsif (exists $self->{'error'}{'_requestContent'}) { }
107 0 1 if (exists $self->{'requestContent'}) { }
1 0 elsif (exists $self->{'error'}{'_requestContent'}) { }
126 0 6 unless exists $self->{'error'}
127 0 6 unless my $c = $self->{'error'}->errorCode
128 4 2 if $self->{'error'}->HTTPError
129 0 2 if $c =~ /^xml/
141 10 17 if ($self->{'error'}->errorCode)
155 4 11 if ($self->{'error'}->errorCode)
169 0 0 unless $self->{'error'}
208 0 5 unless $self->{'file'}
209 0 5 unless open XML, $self->{'file'}
233 2 6 exists $self->{'harvester'} ? :
234 6 2 unless $harvester and $harvester->isa('Net::OAI::Harvester')
237 2 0 if ($rToken)