| line |
true |
false |
branch |
|
240
|
0 |
1 |
-e $path ? :
|
|
|
1 |
1 |
$write ? :
|
|
245
|
0 |
2 |
unless $fh
|
|
255
|
0 |
2 |
if defined $$options{'start'}
|
|
269
|
1 |
1 |
unless $self->trim eq 'none'
|
|
276
|
2 |
0 |
$path ? :
|
|
282
|
1 |
3 |
unless (defined $$self{'end'})
|
|
285
|
0 |
1 |
unless $data_len > 0
|
|
306
|
2 |
7658 |
if (@_)
|
|
309
|
2 |
0 |
if $option eq 'min' or $option eq 'max'
|
|
328
|
0 |
3818 |
if (@_)
|
|
338
|
0 |
0 |
if @_
|
|
344
|
1 |
2 |
if ($$self{'dirty'} and $$self{'write'})
|
|
356
|
1 |
1 |
unless $fh->read($header, 256) == 256
|
|
389
|
0 |
1 |
unless $fh->print($header)
|
|
396
|
0 |
1 |
unless $self->max - $self->min
|
|
400
|
1 |
0 |
if ($trim =~ /([a-z]+)(\d+)/) { }
|
|
407
|
0 |
1 |
unless ($self->can($method))
|
|
421
|
1 |
0 |
$self->min > $mean - $stdev ? :
|
|
422
|
1 |
0 |
$self->max < $mean + $stdev ? :
|
|
431
|
0 |
3809 |
unless @_ == 2
|
|
438
|
0 |
0 |
unless @_ == 3
|
|
448
|
0 |
3809 |
unless $offset >= 256
|
|
449
|
0 |
3809 |
unless $self->seek($offset)
|
|
451
|
0 |
3809 |
if (@_ == 2) { }
|
|
|
3809 |
0 |
elsif (@_ == 1) { }
|
|
456
|
0 |
0 |
unless $self->fh->print(pack('C*', ($scaled_value) x (($end - $position + 1) / $step)))
|
|
457
|
0 |
0 |
if not exists $$self{'end'} or $$self{'end'} < $end
|
|
463
|
0 |
3809 |
unless $self->fh->print(pack('C*', $scaled_value))
|
|
464
|
3809 |
0 |
if not exists $$self{'end'} or $$self{'end'} < $position
|
|
470
|
0 |
0 |
unless $self->fh->read($buffer, 1)
|
|
474
|
0 |
0 |
if ($scaled_value == 0 and (my $span = $self->span) > 1)
|
|
476
|
0 |
0 |
unless $offset >= 256
|
|
477
|
0 |
0 |
unless $self->seek($offset)
|
|
482
|
0 |
0 |
if $val eq "\000"
|
|
502
|
0 |
0 |
unless @_ == 2 and ref $_[1] eq 'ARRAY'
|
|
511
|
0 |
4 |
if (ref $_[0] and ref $_[0] eq 'ARRAY') { }
|
|
521
|
0 |
0 |
unless 'MIME::Base64'->can('encode_base64')
|
|
529
|
0 |
0 |
unless 'MIME::Base64'->can('decode_base64')
|
|
562
|
1 |
0 |
if $e > $end
|
|
581
|
2168 |
2832 |
unless (defined $v)
|
|
582
|
56 |
2112 |
if (defined $last_val)
|
|
590
|
0 |
2832 |
if (defined $last_val and $last_val != $v)
|
|
598
|
1 |
0 |
if $last_val
|
|
606
|
0 |
57 |
if ($fh) { }
|
|
631
|
0 |
0 |
unless $self->fh->print(substr($wifdata, 264))
|
|
632
|
0 |
0 |
if not defined $$self{'end'} or $$self{'end'} < $end
|
|
643
|
0 |
4 |
unless $start >= $data_start
|
|
645
|
0 |
4 |
unless $end <= $self->end + $span
|
|
656
|
0 |
4 |
if ($length / $samples > 100 and $step == 1)
|
|
668
|
0 |
0 |
if (@bases) { }
|
|
676
|
0 |
0 |
if not defined $max or $max < $_
|
|
693
|
0 |
4 |
if ($step == $span) { }
|
|
707
|
5141 |
61 |
unless $value
|
|
715
|
0 |
4 |
if defined $self->window and $self->window > 1
|
|
732
|
0 |
4 |
if length $packed_data < $length / $step
|
|
747
|
4 |
0 |
if ($window_size < 2) { }
|
|
769
|
0 |
0 |
$smoothing eq 'none' ? :
|
|
|
0 |
0 |
$smoothing eq 'min' ? :
|
|
|
0 |
0 |
$smoothing eq 'max' ? :
|
|
|
0 |
0 |
$smoothing eq 'mean' ? :
|
|
783
|
0 |
0 |
if $smoothing eq 'none' or $window < 2
|
|
787
|
0 |
0 |
unless $window % 2
|
|
803
|
0 |
4 |
if @_
|
|
811
|
0 |
0 |
unless defined $v
|
|
815
|
0 |
0 |
$items ? :
|
|
822
|
0 |
0 |
unless defined $v
|
|
823
|
0 |
0 |
if not defined $max or $max < $v
|
|
832
|
0 |
0 |
unless defined $v
|
|
833
|
0 |
0 |
if not defined $min or $min > $v
|
|
856
|
0 |
0 |
unless $fh->print($packed_data)
|
|
859
|
0 |
0 |
if not exists $$self{'end'} or $$self{'end'} < $new_end
|
|
869
|
0 |
3809 |
if (ref $values and ref $values eq 'ARRAY') { }
|
|
873
|
0 |
0 |
if $v < 1
|
|
874
|
0 |
0 |
if $v > 255
|
|
880
|
0 |
3809 |
if $v < 1
|
|
881
|
0 |
3809 |
if $v > 255
|
|
892
|
4 |
0 |
if (ref $values and ref $values eq 'ARRAY') { }
|
|
893
|
2926 |
2276 |
$_ ? :
|
|
896
|
0 |
0 |
$values ? :
|
|
902
|
2 |
3811 |
unless ($$self{'scale'})
|