| line |
!l |
l&&!r |
l&&r |
condition |
|
293
|
23 |
0 |
360 |
exists do {
$$self{"LOOKUP"}
}->{$keyword} and defined do {
$$self{"LOOKUP"}
}->{$keyword} |
|
513
|
25 |
0 |
4 |
@{$self->{'HEADER'};} == 0 and $offset < 0 |
|
623
|
2 |
0 |
40 |
exists $args{'Cards'} and defined $args{'Cards'} |
|
|
2 |
0 |
0 |
exists $args{'Items'} and defined $args{'Items'} |
|
|
0 |
0 |
2 |
exists $args{'Hash'} and defined $args{'Hash'} |
|
|
0 |
0 |
0 |
defined $self->{'HEADER'} && @{$self->{'HEADER'};} |
|
649
|
2 |
0 |
0 |
$k eq "SUBHEADERS" and ref $args{'Hash'}{$k} eq "ARRAY" |
|
|
2 |
0 |
0 |
$k eq "SUBHEADERS" and ref $args{'Hash'}{$k} eq "ARRAY" and ref $args{'Hash'}{$k}[0] eq "HASH" |
|
799
|
7 |
4 |
165 |
$match == @items and $match == $nhdr || $opt{'merge_unique'} |
|
955
|
3454 |
0 |
84 |
exists do {
$$self{"LOOKUP"}
}->{$key} and defined do {
$$self{"LOOKUP"}
}->{$key} |
|
1199
|
1 |
4 |
10 |
defined $item && defined $item->type |
|
1200
|
5 |
3 |
7 |
$t_ok and $item->type eq "COMMENT" |
|
1205
|
168 |
8 |
2 |
$t_ok and $item->type eq "END" |
|
|
164 |
12 |
0 |
defined $item and $key eq "END" |
|
1247
|
168 |
1 |
7 |
$t_ok and $item->type eq "COMMENT" |
|
1252
|
168 |
8 |
0 |
$t_ok && $item->type eq 'HEADER' |
|
1267
|
172 |
2 |
2 |
$self->tiereturnsref and scalar @out > 1 |
|
1305
|
0 |
5 |
17 |
defined $value and not ref $value |
|
|
5 |
6 |
11 |
defined $value and not ref $value and not $keyword =~ /(_COMMENT$)|(^(COMMENT|HISTORY)$)/ |
|
|
11 |
9 |
2 |
defined $value and not ref $value and not $keyword =~ /(_COMMENT$)|(^(COMMENT|HISTORY)$)/ and $value =~ s[\s*(?
|
|
1317
|
0 |
5 |
17 |
defined $value and not ref $value |
|
1334
|
2 |
0 |
1 |
defined $tied and UNIVERSAL::isa($tied, "Astro::FITS::Header") |
|
1488
|
1 |
6 |
0 |
defined $type and $type eq 'COMMENT' || $type eq 'BLANK' |
|
1551
|
7 |
2 |
2 |
scalar @{$self->subhdrs;} and not $self->{'SEENKEY'}{'SUBHEADERS'} |
|
1625
|
0 |
0 |
7 |
$index >= 0 and $index <= $#$arr |
|
1732
|
1 |
0 |
3 |
defined $tied and UNIVERSAL::isa($tied, "Astro::FITS::Header") |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
57
|
21 |
20 |
0 |
ref $proto || $proto |
|
751
|
0 |
0 |
373 |
not defined $type or $type eq "BLANK" |
|
799
|
163 |
2 |
4 |
$match == $nhdr || $opt{'merge_unique'} |
|
1197
|
6 |
6 |
166 |
$wantcomment or $key =~ /^(COMMENT)|(HISTORY)$/ |
|
|
12 |
3 |
163 |
$wantcomment or $key =~ /^(COMMENT)|(HISTORY)$/ or $key =~ /^END$/ |
|
1205
|
2 |
0 |
176 |
$t_ok and $item->type eq "END" or defined $item and $key eq "END" |
|
1254
|
11 |
0 |
166 |
UNIVERSAL::isa($hdr, "Astro::FITS::Header") or $ishdr |
|
1324
|
1 |
0 |
17 |
ref $value eq "ARRAY" or length $value > 70 |
|
|
1 |
2 |
15 |
ref $value eq "ARRAY" or length $value > 70 or $value =~ /\n/s |
|
1385
|
1 |
0 |
0 |
@index != 1 or $index[0] != $#{$self->allitems;} |
|
1405
|
1 |
0 |
0 |
@index != 1 or $index[0] != 0 |
|
1459
|
3 |
4 |
9 |
$#values > 0 || ref $value |
|
1488
|
1 |
0 |
5 |
$type eq 'COMMENT' || $type eq 'BLANK' |
|
1659
|
0 |
0 |
0 |
$index > $#$arr or $index < 0 |