| line |
true |
false |
branch |
|
65
|
0 |
0 |
if ($range eq 'AUTO' or not defined $range) { }
|
|
|
0 |
0 |
elsif ($range =~ /^([+-]?)(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?$/u) { }
|
|
|
0 |
0 |
elsif (not $range =~ /^(MIN|MAX)$/u) { }
|
|
78
|
0 |
0 |
if (not defined $tint or $tint eq 'DEFAULT') { }
|
|
|
0 |
0 |
elsif ($tint =~ /^([+]?)(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?$/u and $tint >= 0 && $tint <= 1000 || $tint == -1) { }
|
|
|
0 |
0 |
elsif ($tint =~ /^MIN$/u) { }
|
|
|
0 |
0 |
elsif ($tint =~ /^MAX$/u) { }
|
|
|
0 |
0 |
elsif (not $tint =~ /^(MIN|MAX)$/u) { }
|
|
113
|
0 |
0 |
unless defined $count
|
|
114
|
0 |
0 |
if not $count =~ /^[0-9]*$/u or $count < 1 or $count > 16777215
|
|
118
|
0 |
0 |
unless defined $delay
|
|
119
|
0 |
0 |
unless $count =~ /^([+]?)(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?$/u
|
|
126
|
0 |
0 |
if ($count > 1) { }
|
|
149
|
0 |
0 |
if ($range eq 'AUTO' or not defined $range) { }
|
|
|
0 |
0 |
elsif ($range =~ /^([+-]?)(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?$/u) { }
|
|
|
0 |
0 |
elsif (not $range =~ /^(MIN|MAX)$/u) { }
|
|
163
|
0 |
0 |
if ($tint eq 'DEFAULT' or not defined $tint) { }
|
|
|
0 |
0 |
elsif ($tint =~ /^([+]?)(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?$/u and $tint >= 0 && $tint <= 1000 || $tint == -1) { }
|
|
|
0 |
0 |
elsif ($tint =~ /^MIN$/u) { }
|
|
|
0 |
0 |
elsif ($tint =~ /^MAX$/u) { }
|
|
|
0 |
0 |
elsif (not $tint =~ /^(MIN|MAX)$/u) { }
|
|
185
|
0 |
0 |
unless defined $count
|
|
186
|
0 |
0 |
if not $count =~ /^[0-9]*$/u or $count < 1 or $count > 16777215
|
|
190
|
0 |
0 |
unless defined $delay
|
|
191
|
0 |
0 |
unless $count =~ /^([+]?)(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?$/u
|
|
209
|
0 |
0 |
ref $_[0] eq 'HASH' ? :
|
|
|
0 |
0 |
scalar(@_) % 2 == 0 ? :
|
|
213
|
0 |
0 |
unless defined $args
|
|
229
|
0 |
0 |
ref $_[0] eq 'HASH' ? :
|
|
|
0 |
0 |
scalar(@_) % 2 == 0 ? :
|
|
233
|
0 |
0 |
unless defined $args
|
|
278
|
0 |
0 |
$msb == 0 ? :
|
|
291
|
0 |
0 |
unless ($format =~ /^\s*(ASCII|1|SINT|2|DINT|3|SREAD|4|DREAL|5)\s*$/u)
|
|
303
|
0 |
0 |
ref $_[0] eq 'HASH' ? :
|
|
|
0 |
0 |
scalar(@_) % 2 == 0 ? :
|
|
307
|
0 |
0 |
unless defined $args
|
|
310
|
0 |
0 |
if ($args->{'direct_read'} or not defined $self->device_cache->{'oformat'}) { }
|
|
333
|
0 |
0 |
if ($enable =~ /^ONCE$/iu) { }
|
|
|
0 |
0 |
elsif ($enable =~ /^(ON|1)$/iu) { }
|
|
|
0 |
0 |
elsif ($enable =~ /^(OFF|0)$/iu) { }
|
|
380
|
0 |
0 |
unless ($mode =~ /^(ALL|0|DCV|1|DIG|2|OHMS|4)$/iu)
|
|
398
|
0 |
0 |
if ($value == 1 or $value =~ /on/iu) { }
|
|
|
0 |
0 |
elsif ($value == 0 or $value =~ /off/iu) { }
|
|
419
|
0 |
0 |
unless ($text =~ m{^[A-Za-z0-9\ \!\#\$\%\&\'\(\)\^\\/\@\;\:\[\]\,\.\+\-\=\<\>\?\_]*$}u)
|
|
447
|
0 |
0 |
if defined $request
|
|
454
|
0 |
0 |
if (not $error =~ /0,\"NO ERROR\"/u) { }
|
|
455
|
0 |
0 |
if ($error =~ /^\+?([0-9]*)\,\"?([^\"].*[^\"])\"?$/mu) { }
|
|
478
|
0 |
0 |
unless ($preset =~ /^(FAST|0|NORM|1|DIG|2)$/iu)
|