Branch Coverage

blib/lib/Astro/NED/Query.pm
Criterion Covered Total %
branch 23 52 44.2


line true false branch
45 0 5 if $class eq 'Astro::NED::Query'
54 0 5 if $$self{'_ua'}->res->is_error
64 0 7 unless defined $self->field($key)
83 32 0 exists $self->Field->{$key} ? :
94 0 20 unless 3 == @_
97 20 0 if (defined(my $field = $self->field($name))) { }
102 0 20 if $@
117 0 5 unless defined $name
122 5 0 defined $field ? :
145 0 6 unless 'Regexp' eq ref $name
149 25194 12516 unless defined $input->name and $input->name =~ /$name/ and $input->type eq $type
153 0 12516 if @value > 1
171 0 6 if ($field eq 'DESTROY')
180 0 2 1 == @_ ? :
191 6 0 unless defined &{$class . "::$field";}
194 6 0 unless defined &{$class . "::$alias";}
204 0 2 unless @_ == 4
207 0 2 unless exists $$self{'_Multiple'}{$name}{$value}
212 2 0 if (defined $state and $state) { }
228 0 0 unless @_ == 3
231 0 0 unless exists $$self{'_Multiple'}{$name}{$value}
245 0 0 unless defined $ifield
249 0 0 if (exists $$self{'_Multiple'}{$ifield}) { }
0 0 elsif (defined(my $field = $self->field($ifield))) { }
301 15 2 if defined $value
327 0 4 if ($ua->res->is_error)