Branch Coverage

blib/lib/Astro/PAL.pm
Criterion Covered Total %
branch 11 30 36.6


line true false branch
235 0 11 unless defined $arg
240 4 7 if ($arg =~ /^\d+$/) { }
266 0 0 if (@_ > 1) { }
271 0 0 unless @aoprms == 14
289 0 1 unless @_ > 1
295 1 0 if (@_ > 1) { }
301 0 1 unless @aoprms == 14
439 0 0 unless scalar @_ == 1
450 0 0 unless defined $ident
474 0 0 unless scalar @_ == 1
506 0 2 unless scalar @_ == 7
513 0 2 if ($j != 0)
520 0 2 if ($palstatus != 0)
551 0 2 unless scalar @_ == 7
562 0 2 unless defined $ident