| line |
true |
false |
branch |
|
155
|
0 |
1 |
if ($verbose > 1) |
|
162
|
0 |
1 |
unless open my $hdrfile, "<", $hdrname |
|
166
|
0 |
1 |
if (eof $hdrfile) |
|
174
|
0 |
1 |
unless ($line =~ /^ENVI\r?$/) |
|
185
|
0 |
18 |
if $line =~ /^;/ |
|
189
|
0 |
18 |
if $line =~ /^$/ |
|
193
|
2 |
16 |
if ($in_list > 0) { } |
|
196
|
0 |
2 |
if ($line =~ /{/) |
|
199
|
2 |
0 |
if ($val =~ /}$/) |
|
201
|
0 |
2 |
if $verbose > 1 |
|
209
|
16 |
0 |
if (defined $keyword) { } |
|
211
|
0 |
16 |
if ($keyword =~ /_/) |
|
222
|
4 |
12 |
if $val =~ /^{/ and not $in_list |
|
223
|
2 |
14 |
if $val =~ /}$/ and $in_list |
|
225
|
2 |
14 |
if $in_list > 0 |
|
228
|
2 |
12 |
if ($val =~ /^{/) |
|
233
|
0 |
2 |
if $verbose |
|
237
|
8 |
6 |
$envi_keywords->{$keyword} ? : |
|
238
|
0 |
14 |
if $verbose |
|
246
|
0 |
0 |
if $verbose |
|
283
|
0 |
0 |
if $#_ > 0 |
|
292
|
0 |
0 |
if $verbose |
|
298
|
0 |
0 |
unless (-f $envihdrname) |
|
303
|
0 |
0 |
unless -r $envihdrname |
|
308
|
0 |
0 |
if ($envihdr->{'header_offset'}) |
|
313
|
0 |
0 |
$PDL::IO::ENVI::Config{'byteorder'} =~ /4321$/ ? : |
|
314
|
0 |
0 |
if $verbose > 1 |
|
315
|
0 |
0 |
if ($byteorder != $envihdr->{'byte_order'}) |
|
316
|
0 |
0 |
if $verbose |
|
317
|
0 |
0 |
if $verbose |
|
318
|
0 |
0 |
if $byteorder != $envihdr->{'byte_order'} |
|
324
|
0 |
0 |
if $verbose |
|
330
|
0 |
0 |
if $verbose |
|
332
|
0 |
0 |
if $verbose |
|
339
|
0 |
0 |
if (2 == @envidata) { } |
|
350
|
0 |
0 |
if (exists $envihdr->{'data_ignore_value'}) |
|
356
|
0 |
0 |
wantarray ? : |