| line |
true |
false |
branch |
|
113
|
0 |
1 |
$^O =~ /win32/i ? : |
|
114
|
0 |
1 |
$^O =~ /win32/i ? : |
|
115
|
0 |
9 |
if -x "$_/$prog$exe" |
|
121
|
1 |
0 |
if (not $^O =~ /(MSWin32|bsd)$/ or $^O eq 'gnukfreebsd') |
|
122
|
0 |
1 |
if $uudecode_ok = &$checkprog('uudecode') and &$checkprog('uuencode') |
|
169
|
0 |
7 |
if $pdls{$v} > 1 |
|
171
|
0 |
5 |
if $dups |
|
215
|
0 |
0 |
unless (defined $fh) |
|
252
|
0 |
0 |
unless (defined $fh) |
|
307
|
1 |
6 |
if $x->nelem <= $small_thresh and not keys %{$x->hdr;} |
|
312
|
3 |
3 |
if $x->nelem <= $med_thresh and not +(tied %{$x->hdr;} || '') =~ /^Astro::FITS::Header\=/ |
|
347
|
0 |
4 |
unless (ref $pdl) |
|
353
|
0 |
4 |
if ($pdl->nelem == 0) |
|
367
|
4 |
0 |
if (defined $stringify_formats{$t}) { } |
|
370
|
0 |
0 |
unless ($stringify_warned) |
|
386
|
4 |
0 |
$stringify_formats{$t} ? : |
|
433
|
0 |
3 |
if ($uudecode_ok) { } |
|
|
3 |
0 |
elsif ($convert_ok) { } |
|
478
|
1 |
6 |
if ($style == 0) { } |
|
486
|
3 |
3 |
if ($style == 1) { } |
|
503
|
0 |
3 |
if ($uudecode_ok) { } |
|
|
3 |
0 |
elsif ($convert_ok) { } |
|
532
|
2 |
1 |
unless (scalar keys %{$_->hdr;}) |
|
552
|
2 |
4 |
if (scalar keys %{$_->hdr;}) |
|
553
|
0 |
2 |
if ((tied %{$_->hdr;} || '') =~ /Astro::FITS::Header\=/) { } |
|
591
|
3 |
12 |
unless ref $_ |
|
593
|
1 |
11 |
if (UNIVERSAL::isa($_, 'ARRAY')) { } |
|
|
4 |
7 |
elsif (UNIVERSAL::isa($_, 'HASH')) { } |
|
|
7 |
0 |
elsif (UNIVERSAL::isa($_, 'PDL')) { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($_, 'SCALAR')) { } |
|
617
|
1 |
6 |
if defined $strings[1] |