Branch Coverage

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


line true false branch
69 0 11 if exists $self->{'responseDate'}
70 11 0 if exists $self->{'error'}{'_responseDate'}
96 9 1 if (wantarray) { }
97 0 9 if (exists $self->{'requestContent'}) { }
9 0 elsif (exists $self->{'error'}{'_requestContent'}) { }
106 0 1 if (exists $self->{'requestContent'}) { }
1 0 elsif (exists $self->{'error'}{'_requestContent'}) { }
125 0 6 unless exists $self->{'error'}
126 0 6 unless my $c = $self->{'error'}->errorCode
127 4 2 if $self->{'error'}->HTTPError
128 0 2 if $c =~ /^xml/
140 10 15 if ($self->{'error'}->errorCode)
154 4 9 if ($self->{'error'}->errorCode)
168 0 0 unless $self->{'error'}
207 0 4 unless $self->{'file'}
208 0 4 unless open XML, $self->{'file'}
232 2 6 exists $self->{'harvester'} ? :
233 6 2 unless $harvester and $harvester->isa('Net::OAI::Harvester')
236 2 0 if ($rToken)