Branch Coverage

blib/lib/Astro/Coord/ECI/TLE/Set.pm
Criterion Covered Total %
branch 41 86 47.6


line true false branch
162 0 11 if ref $class
168 6 5 if @args
197 1 0 unless defined $effective
200 1 13 __instance($_, 'Astro::Coord::ECI::TLE::Set') ? :
203 4 10 if (defined $id) { }
204 0 4 unless __instance($tle, $class)
208 0 4 unless $aid == $id
213 0 10 unless __instance($tle, "Astro::Coord::ECI::TLE")
222 13 1 unless defined $aep
223 0 14 if $ep{$aep}
260 0 3 if ref $class
261 0 3 'HASH' eq ref $args[0] ? :
267 0 8 if ('' eq $id and 'null' eq $model) { }
274 1 2 $Singleton ? :
277 4 1 if ($items > $limit) { }
280 0 4 if exists $opt->{'select'}
304 0 8 if $@
305 3 5 if $rslt
352 0 0 if $override{$name}
373 0 3 unless @{$self->{'members'};}
374 3 0 if (@args) { }
413 2 4 unless $self->{'current'}
439 13 3 if (defined $time)
440 0 13 unless @{$self->{'members'};}
445 18 8 unless defined $effective and $_->[0] > $time
465 0 1 unless $self->{'current'}
468 0 1 if ($self->{'current'}->is_model_attribute($name)) { }
504 0 0 unless my $delegate = $self->{'current'}
532 0 0 'HASH' eq ref $args[0] ? :
535 0 0 if $members[0][1]->get("backdate")
545 0 0 if defined $end and $time > $end
546 0 0 if defined $start and $time < $start
549 0 0 if $tle->validate($opt, @check)
552 0 0 if @valid == @members
554 0 0 unless (@valid)
559 0 0 unless defined $valid[0][0]
561 0 0 unless defined $valid[0][0]
565 0 0 if $self->{'current'}
569 0 0 if defined $time
587 0 12 unless my $delegate = $self->{'current'}
588 5 0 if (@args > 1 and $selector{$routine} || $delegate->is_valid_model($routine))
594 1 11 if ($coderef = $delegate->can("_nodelegate_$routine")) { }
11 0 elsif ($coderef = $delegate->can($routine)) { }