line |
!l |
l&&!r |
l&&r |
condition |
293
|
22 |
0 |
353 |
exists ${$$self{'LOOKUP'};}{$keyword} and defined ${$$self{'LOOKUP'};}{$keyword} |
513
|
25 |
0 |
3 |
@{$$self{'HEADER'};} == 0 and $offset < 0 |
623
|
2 |
0 |
32 |
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
|
6 |
168 |
0 |
$match == @items and $match == $nhdr || $opt{'merge_unique'} |
955
|
2792 |
0 |
70 |
exists ${$$self{'LOOKUP'};}{$key} && defined ${$$self{'LOOKUP'};}{$key} |
1199
|
1 |
4 |
10 |
defined $item && defined $item->type |
1200
|
5 |
3 |
7 |
$t_ok and $item->type eq 'COMMENT' |
1205
|
164 |
8 |
2 |
$t_ok and $item->type eq 'END' |
|
160 |
12 |
0 |
defined $item and $key eq 'END' |
1247
|
164 |
1 |
7 |
$t_ok and $item->type eq 'COMMENT' |
1252
|
164 |
8 |
0 |
$t_ok && $item->type eq 'HEADER' |
1267
|
170 |
0 |
2 |
$self->tiereturnsref and scalar @out > 1 |
1305
|
0 |
5 |
16 |
defined $value and not ref $value |
|
5 |
6 |
10 |
defined $value and not ref $value and not $keyword =~ /(_COMMENT$)|(^(COMMENT|HISTORY)$)/ |
|
11 |
8 |
2 |
defined $value and not ref $value and not $keyword =~ /(_COMMENT$)|(^(COMMENT|HISTORY)$)/ and $value =~ s[\s*(?
|
1317
|
0 |
5 |
16 |
defined $value and not ref $value |
1334
|
2 |
0 |
1 |
defined $tied and UNIVERSAL::isa($tied, 'Astro::FITS::Header') |
1488
|
0 |
3 |
0 |
defined $type and $type eq 'COMMENT' || $type eq 'BLANK' |
1550
|
3 |
1 |
1 |
scalar @{$self->subhdrs;} and not $$self{'SEENKEY'}{'SUBHEADERS'} |
1624
|
0 |
0 |
5 |
$index >= 0 and $index <= $#$arr |
1731
|
1 |
0 |
3 |
defined $tied and UNIVERSAL::isa($tied, 'Astro::FITS::Header') |
line |
l |
!l&&r |
!l&&!r |
condition |
57
|
18 |
16 |
0 |
ref $proto || $proto |
751
|
0 |
0 |
369 |
not defined $type or $type eq 'BLANK' |
799
|
162 |
2 |
4 |
$match == $nhdr || $opt{'merge_unique'} |
1197
|
6 |
6 |
162 |
$wantcomment or $key =~ /^(COMMENT)|(HISTORY)$/ |
|
12 |
3 |
159 |
$wantcomment or $key =~ /^(COMMENT)|(HISTORY)$/ or $key =~ /^END$/ |
1205
|
2 |
0 |
172 |
$t_ok and $item->type eq 'END' or defined $item and $key eq 'END' |
1254
|
11 |
0 |
162 |
UNIVERSAL::isa($hdr, 'Astro::FITS::Header') or $ishdr |
1324
|
1 |
0 |
16 |
ref $value eq 'ARRAY' or length $value > 70 |
|
1 |
2 |
14 |
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 |
8 |
$#values > 0 || ref $value |
1488
|
1 |
0 |
2 |
$type eq 'COMMENT' || $type eq 'BLANK' |
1658
|
0 |
0 |
0 |
$index > $#$arr or $index < 0 |