line |
true |
false |
branch |
39
|
0 |
15 |
unless 2 == @_ |
48
|
23 |
0 |
if (exists $main::config_parms{'debug'}) |
49
|
1 |
22 |
$main::config_parms{'debug'} eq 'X10' ? : |
51
|
1 |
22 |
if $ControlX10::CM17::DEBUG |
54
|
1 |
22 |
unless ($data) |
60
|
2 |
20 |
if ($code =~ /(\S)([\+\-])(\d+)/) |
65
|
0 |
2 |
if $ControlX10::CM17::DEBUG |
69
|
1 |
1 |
$dir eq '+' ? : |
79
|
2 |
18 |
unless $data2 |
81
|
2 |
18 |
unless ($data2) |
104
|
1 |
17 |
if $ControlX10::CM17::DEBUG |
108
|
324 |
396 |
if ($bit) { } |
110
|
17 |
307 |
if $ControlX10::CM17::DEBUG |
114
|
23 |
373 |
if $ControlX10::CM17::DEBUG |
123
|
1 |
17 |
if $ControlX10::CM17::DEBUG |