| line |
true |
false |
branch |
|
30
|
0 |
2 |
if (not defined $plots) { }
|
|
|
2 |
0 |
elsif (ref $plots eq 'ARRAY') { }
|
|
67
|
2 |
0 |
if ($filenamebase =~ m[(.+)(/|//|\\|\\\\)(.+)\b]u)
|
|
71
|
2 |
0 |
if ($filename =~ /(.+)(\..+)\b/u)
|
|
79
|
0 |
2 |
unless (-d $directory)
|
|
82
|
0 |
0 |
unless make_path($directory)
|
|
97
|
0 |
8 |
if ($file =~ /($temp_filename)(_(\d+))?($filenameextension)\b/u)
|
|
99
|
0 |
0 |
if ($3 > $max_index) { }
|
|
|
0 |
0 |
elsif (not defined $3) { }
|
|
114
|
0 |
2 |
if ($max_index > 1) { }
|
|
127
|
0 |
2 |
unless open my $LOG, ">" . $file_data
|
|
157
|
0 |
0 |
if (not defined $plots) { }
|
|
|
0 |
0 |
elsif (ref $plots eq 'ARRAY') { }
|
|
205
|
0 |
2 |
if ($self->{'block_num'})
|
|
233
|
2 |
0 |
if ($self->{'block_num'} == 1) { }
|
|
|
0 |
0 |
elsif ($self->{'block_num'} > 1) { }
|
|
254
|
2 |
44 |
if ($data =~ /^#/u) { }
|
|
|
0 |
44 |
elsif ($data eq 'NEW_BLOCK') { }
|
|
264
|
0 |
44 |
if (ref $data eq 'ARRAY') { }
|
|
|
44 |
0 |
elsif (ref $data eq 'HASH') { }
|
|
269
|
0 |
0 |
if (ref $item eq 'ARRAY') { }
|
|
277
|
0 |
0 |
if ($number_of_columns >= 1) { }
|
|
292
|
0 |
0 |
if ($data[$i][$j] =~ /(^[-+]?[0-9]+)\.?([0-9]+)?([eE][-+]?[0-9]+)?$/u) { }
|
|
295
|
0 |
0 |
if ($data[$i][$j] < $self->{'DATA'}[$i][0] or not defined $self->{'DATA'}[$i][0]) { }
|
|
|
0 |
0 |
elsif ($data[$i][$j] > $self->{'DATA'}[$i][1] or not defined $self->{'DATA'}[$i][0]) { }
|
|
333
|
0 |
0 |
if ($value =~ /(^[-+]?[0-9]+)\.?([0-9]+)?([eE][-+]?[0-9]+)?$/u) { }
|
|
336
|
0 |
0 |
if ($value < $self->{'DATA'}[$i][0] or not defined $self->{'DATA'}[$i][0]) { }
|
|
|
0 |
0 |
elsif ($value > $self->{'DATA'}[$i][1] or not defined $self->{'DATA'}[$i][0]) { }
|
|
381
|
0 |
0 |
if ($data =~ /(^[-+]?[0-9]+)\.?([0-9]+)?([eE][-+]?[0-9]+)?$/u) { }
|
|
383
|
0 |
0 |
if ($data < $self->{'DATA'}[0][0] or not defined $self->{'DATA'}[0][0]) { }
|
|
|
0 |
0 |
elsif ($data > $self->{'DATA'}[0][1] or not defined $self->{'DATA'}[0][0]) { }
|
|
458
|
0 |
44 |
unless (defined $self->{'plots'})
|
|
471
|
0 |
0 |
if (not defined $self->{'plots'}[$i]{'plotter'}{'plot'}{'started'}) { }
|
|
475
|
0 |
0 |
if ($self->{'plots'}[$i]{'plotter'}{'plot'}{'type'} eq 'pm3d' and $self->{'block_num'} <= 1) { }
|
|
503
|
0 |
0 |
if (ref $data eq 'ARRAY') { }
|
|
508
|
0 |
0 |
if (ref $item eq 'ARRAY') { }
|
|
516
|
0 |
0 |
if ($number_of_columns >= 1) { }
|
|
520
|
0 |
0 |
if ($data[$i][$j] =~ /[[:alpha:]]/u or not $data[$i][$j] =~ /[[:alnum:]]/u) { }
|
|
541
|
0 |
0 |
if ($value =~ /[[:alpha:]]/u or not $value =~ /[[:alnum:]]/u) { }
|
|
559
|
0 |
0 |
if ($data =~ /[[:alpha:]]/u or not $data =~ /[[:alnum:]]/u) { }
|