| line |
true |
false |
branch |
|
82
|
0 |
4 |
if $opt{'as_pdl'} and not $have_PDL |
|
94
|
0 |
8 |
unless my $fh = 'IO::File'->new($file) |
|
105
|
82 |
1873 |
if ($line =~ /-$/) |
|
111
|
80 |
2 |
unless $fh->eof |
|
159
|
0 |
4 |
unless defined $dline |
|
189
|
7 |
6 |
if ($$vec{'errtype'} == 1) { } |
|
|
1 |
5 |
elsif ($$vec{'errtype'} == 2) { } |
|
246
|
20 |
4 |
$$_{'errtype'} == 1 ? : |
|
|
10 |
24 |
$$_{'errtype'} == 0 ? : |
|
254
|
0 |
12 |
if ($$opt{'as_pdl'}) |
|
264
|
0 |
12 |
if ($$opt{'normalize'}) |
|
284
|
8 |
1726 |
if ($$hdr{'skip'} and $line =~ /^\s*NO\s+/) |
|
290
|
8 |
0 |
if ($$hdr{'skip'} and $$hdr{'skip'} <= $NO + 1) |
|
298
|
1718 |
8 |
if ($line =~ /^\s*$Astro::QDP::Parse::RE{'num'}{'real'}/ or $line =~ /^\s*NO\s+/) { } |
|
300
|
0 |
8716 |
$_ eq 'NO' ? : |
|
301
|
0 |
1718 |
if (@data != @cols) |
|
336
|
3 |
74 |
if ($line =~ /^\s*\@(.*)/) { } |
|
353
|
4 |
70 |
if ($cmd eq 'skip') |
|
356
|
0 |
4 |
unless defined $opt |