| line |
true |
false |
branch |
|
95
|
0 |
0 |
unless $file =~ s[^\s*([A-z/.\d_-]+).*$][$1] |
|
119
|
0 |
0 |
if (defined $$gnuplot{'terminal'} and $$gnuplot{'terminal'} =~ /postscript/i) { } |
|
121
|
0 |
0 |
if $$gnuplot{'terminal'} =~ /eps/i |
|
132
|
0 |
0 |
unless my $GP = 'IO::File'->new("$file.gp", 'w') |
|
158
|
0 |
0 |
unless my $fh = 'IO::File'->new("$file.dat", 'w') |
|
165
|
0 |
0 |
unless defined $average |
|
168
|
0 |
0 |
unless $fh = 'IO::File'->new("$file.average.dat", 'w') |
|
193
|
0 |
0 |
if ($rc == 0) { } |
|
|
0 |
0 |
elsif ($rc == 65280) { } |
|
|
0 |
0 |
elsif ($rc > 128) { } |
|
202
|
0 |
0 |
if ($rc & 128) |
|
225
|
0 |
0 |
if $n < $k |
|
244
|
0 |
0 |
if $n < 0 |
|
246
|
0 |
0 |
if exists $_fac[$n] |