| line |
true |
false |
branch |
|
13
|
0 |
0 |
unless exists $$self{'TUXDIR'} |
|
14
|
0 |
0 |
unless exists $$self{'TUXCONFIG'} |
|
15
|
0 |
0 |
unless exists $$self{'BDMCONFIG'} |
|
25
|
0 |
0 |
unless ref $input_buffer eq 'HASH' |
|
44
|
0 |
0 |
unless open2(\*READER, \*WRITER, $$self{'TUXDIR'} . '/bin/ud32 -e 1 -C tpsysadm 2>/dev/null') |
|
49
|
0 |
0 |
if $self->debug |
|
53
|
0 |
0 |
unless ref $$input_buffer{$field} eq 'ARRAY' |
|
65
|
0 |
0 |
if /^$/ |
|
70
|
0 |
0 |
if /^RTN pkt/ |
|
73
|
0 |
0 |
unless $field |
|
74
|
0 |
0 |
if (exists $output_buffer{$field}) { } |
|
84
|
0 |
0 |
if $self->debug |
|
87
|
0 |
0 |
if (exists $output_buffer{'TA_STATUS'}) { } |
|
105
|
0 |
0 |
if $error_code eq '' |
|
106
|
0 |
0 |
if $error_code == -1 |
|
108
|
0 |
0 |
if $error_code == -2 |
|
110
|
0 |
0 |
if $error_code == -3 |
|
112
|
0 |
0 |
if $error_code == -4 |
|
114
|
0 |
0 |
if $error_code == -5 |
|
116
|
0 |
0 |
if $error_code == -6 |
|
118
|
0 |
0 |
if $error_code == -7 |
|
120
|
0 |
0 |
if $error_code == -8 |
|
122
|
0 |
0 |
if $error_code == -9 |
|
124
|
0 |
0 |
if $error_code == -10 |
|
126
|
0 |
0 |
if $error_code == -11 |
|
128
|
0 |
0 |
if $error_code == 0 |
|
130
|
0 |
0 |
if $error_code == 1 |
|
132
|
0 |
0 |
if $error_code == 2 |
|
140
|
0 |
0 |
if (@_ == 0) { } |
|
|
0 |
0 |
elsif (@_ == 1) { } |
|
|
0 |
0 |
elsif (@_ == 2) { } |
|
161
|
0 |
0 |
if @_ == 1 |