| line |
!l |
l&&!r |
l&&r |
condition |
|
293
|
23 |
0 |
359 |
exists do {
$$self{'LOOKUP'}
}->{$keyword} and defined do {
$$self{'LOOKUP'}
}->{$keyword} |
|
513
|
25 |
0 |
4 |
@{$self->{'HEADER'};} == 0 and $offset < 0 |
|
623
|
2 |
0 |
37 |
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
|
3357 |
0 |
75 |
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 |
18 |
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 |