line |
true |
false |
branch |
183
|
0 |
0 |
if ($^O eq 'MSWin32') { } |
188
|
0 |
0 |
unless (defined $port) |
215
|
0 |
0 |
if ($count == 0) |
222
|
0 |
0 |
if ($char ne '#') |
274
|
0 |
0 |
if (defined $response) { } |
293
|
0 |
0 |
if ($ra < -0.1 or $ra > 360.1) |
296
|
0 |
0 |
if ($de < -90.1 or $de > 90.1) |
300
|
0 |
0 |
if (defined $precise and $precise = 1) { } |
308
|
0 |
0 |
if (defined $response) { } |
330
|
0 |
0 |
if ($az < -0.1 or $az > 360.1) |
333
|
0 |
0 |
if ($alt < -90.1 or $alt > 90.1) |
337
|
0 |
0 |
if (defined $precise and $precise = 1) { } |
345
|
0 |
0 |
if (defined $response) { } |
370
|
0 |
0 |
if (defined $precise and $precise = 1) { } |
373
|
0 |
0 |
unless (defined $response) |
380
|
0 |
0 |
unless (defined $response) |
407
|
0 |
0 |
if (defined $precise and $precise = 1) { } |
410
|
0 |
0 |
unless (defined $response) |
417
|
0 |
0 |
unless (defined $response) |
441
|
0 |
0 |
if ($ra < 0 or $ra > 360) |
444
|
0 |
0 |
if ($de < -90 or $de > 90) |
448
|
0 |
0 |
if (defined $precise and $precise = 1) { } |
456
|
0 |
0 |
if (defined $response) { } |
477
|
0 |
0 |
if (defined $response) { } |
494
|
0 |
0 |
if (defined $response) { } |
512
|
0 |
0 |
if (defined $response) { } |
530
|
0 |
0 |
if (defined $response) { } |
548
|
0 |
0 |
if (defined $response) { } |
574
|
0 |
0 |
unless (defined $response) |
589
|
0 |
0 |
if (defined $str and $str = 1) { } |
592
|
0 |
0 |
if ($lato) |
595
|
0 |
0 |
if ($lono) |
601
|
0 |
0 |
if ($lato) |
604
|
0 |
0 |
if ($lono) |
628
|
0 |
0 |
if ($lon < 0) |
632
|
0 |
0 |
if ($lat < 0) |
637
|
0 |
0 |
if ($lat > 90 or $lon > 180) |
655
|
0 |
0 |
if (defined $response) { } |
679
|
0 |
0 |
unless (defined $response) |
690
|
0 |
0 |
if $tz > 12 |
693
|
0 |
0 |
if (defined $str and $str = 1) { } |
719
|
0 |
0 |
if $tz < 0 |
721
|
0 |
0 |
if (defined $dst and $dst != 0) { } |
743
|
0 |
0 |
unless (defined $response) |
750
|
0 |
0 |
if ($model == 5 or $model == 20) |
758
|
0 |
0 |
unless (defined $response) |
764
|
0 |
0 |
unless (defined $response) |
770
|
0 |
0 |
unless (defined $response) |
789
|
0 |
0 |
if (defined $response) { } |
807
|
0 |
0 |
if ($mode < 0 or $mode > 3) |
813
|
0 |
0 |
if (defined $response) { } |
835
|
0 |
0 |
if ($axis > 0) { } |
841
|
0 |
0 |
if ($direction > 0) { } |
847
|
0 |
0 |
if ($rate < 0 or $rate > 9) |
853
|
0 |
0 |
if (defined $response) { } |
874
|
0 |
0 |
if ($axis > 0) { } |
880
|
0 |
0 |
if ($direction > 0) { } |
892
|
0 |
0 |
if (defined $response) { } |
932
|
0 |
0 |
if ($axis > 0) { } |
940
|
0 |
0 |
if (defined $response) { } |
961
|
0 |
0 |
if ($axis > 0) { } |
969
|
0 |
0 |
if ($rate < 0 or $rate > 99) |
976
|
0 |
0 |
if ($rate == 0) { } |
|
0 |
0 |
elsif ($rate == 99) { } |
986
|
0 |
0 |
if (defined $response) { } |
1006
|
0 |
0 |
if ($axis > 0) { } |
1012
|
0 |
0 |
if ($direction > 0) { } |
1019
|
0 |
0 |
if (defined $response) { } |
1039
|
0 |
0 |
if ($axis > 0) { } |
1045
|
0 |
0 |
if ($direction > 0) { } |
1052
|
0 |
0 |
if ($backlash < 0 or $backlash > 99) |
1057
|
0 |
0 |
if (defined $response) { } |
1110
|
0 |
0 |
if (defined $response) { } |
1111
|
0 |
0 |
if (ord substr($response, 0, 1)) { } |
1136
|
0 |
0 |
if (defined $response) { } |
1160
|
0 |
0 |
if ($action == 1) { } |
|
0 |
0 |
elsif ($action == 0) { } |
1169
|
0 |
0 |
if (defined $response) { } |
1189
|
0 |
0 |
if (defined $response) { } |
1190
|
0 |
0 |
if (ord substr($response, 0, 1)) { } |
1213
|
0 |
0 |
if ($action != 1 and $action != 0) |
1218
|
0 |
0 |
if (defined $response) { } |
1239
|
0 |
0 |
if (defined $response) { } |
1258
|
0 |
0 |
if (defined $response) { } |
1269
|
0 |
0 |
if (defined $response) { } |
1280
|
0 |
0 |
if (defined $response) { } |
1304
|
0 |
0 |
unless (defined $len) |
1308
|
0 |
0 |
if ($len != @{$data;}) |
1322
|
0 |
0 |
if ($diff < 0) { } |
1327
|
0 |
0 |
if ($rdiff > 127 or $rdiff < -127) |
1333
|
0 |
0 |
unless (defined $res) |
1341
|
0 |
0 |
unless (defined $res) |
1363
|
0 |
0 |
unless (defined $len) |
1371
|
0 |
0 |
unless (defined $rdiff) |
1377
|
0 |
0 |
if ($rdiff > 0) { } |
1401
|
0 |
0 |
if ($num =~ /^[-+]?\d+\.?\d*$/) { } |
1464
|
0 |
0 |
if ($x1 == 0) { } |
1465
|
0 |
0 |
if ($y1 > 0) { } |
1469
|
0 |
0 |
if ($ra1 < 0) |
1488
|
0 |
0 |
if ($num - floor($num) < 0.5) { } |
1522
|
0 |
0 |
if ($ang >= 0) { } |
1544
|
0 |
0 |
if ($ang >= 0) { } |
1589
|
0 |
0 |
if (@dms > 3 or $angle eq '') |
1593
|
0 |
0 |
unless ($dms[0] =~ /^[+-]?\d+$/) |
1596
|
0 |
0 |
if ($dms[1] < 0 or $dms[1] > 59 or $dms[1] =~ /[\D]/) |
1599
|
0 |
0 |
if ($dms[2] < 0 or $dms[2] > 59 or $dms[2] =~ /[\D]/) |
1603
|
0 |
0 |
if ($dms[0] =~ /^-/) { } |
1621
|
0 |
0 |
if (@hms > 3 or $hours eq '') |
1625
|
0 |
0 |
if ($hms[0] < 0 or $hms[0] > 23 or $hms[0] =~ /[\D]/) |
1628
|
0 |
0 |
if ($hms[1] < 0 or $hms[1] > 59 or $hms[1] =~ /[\D]/) |
1631
|
0 |
0 |
if ($hms[2] < 0 or $hms[2] > 59 or $hms[2] =~ /[\D]/) |
1658
|
0 |
0 |
if $d2 < -90.0002 |
1659
|
0 |
0 |
if $d2 > 90.0002 |
1680
|
0 |
0 |
if $d2 < -90.0002 |
1681
|
0 |
0 |
if $d2 > 90.0002 |
1699
|
0 |
0 |
if $d1 < 0 |
1700
|
0 |
0 |
if $d2 < 0 |
1723
|
0 |
0 |
if $d1 < 0 |
1724
|
0 |
0 |
if $d2 < 0 |