line |
true |
false |
branch |
17
|
0 |
1 |
if (index($^O, 'Win') >= 0) { } |
81
|
0 |
0 |
if index($aOpt{'ostype'}, 'Win') >= 0 |
95
|
0 |
0 |
if $aOpt{'ostype'} eq 'windoze' and $aOpt{'log'} =~ /syslog/i |
98
|
0 |
0 |
if (not ref $aOpt{'log'}) { } |
103
|
0 |
0 |
if (not $@) { } |
114
|
0 |
0 |
if (ref $aOpt{'_log'} and $aOpt{'_log'}->can('loglevel')) |
140
|
0 |
0 |
if (not defined $mode) { } |
|
0 |
0 |
elsif ($mode =~ /VOICE/i or $number =~ /;/) { } |
153
|
0 |
0 |
if ($self->flag('CARRIER')) |
159
|
0 |
0 |
unless (defined $number) |
173
|
0 |
0 |
if ($mode eq 'VOICE') |
179
|
0 |
0 |
if (length $number == 1) { } |
191
|
0 |
0 |
if (index($ans, 'CONNECT') > -1 or index($ans, 'RING') > -1) |
199
|
0 |
0 |
wantarray ? : |
206
|
0 |
0 |
$lEnable ? : |
207
|
0 |
0 |
$lEnable ? : |
219
|
0 |
0 |
unless ($ok) |
235
|
0 |
0 |
if ($self->flag('CARRIER')) { } |
254
|
0 |
0 |
unless ($lOk) |
285
|
0 |
0 |
unless $register |
290
|
0 |
0 |
if (@_) { } |
297
|
0 |
0 |
index($self->answer, 'OK') != -1 ? : |
304
|
0 |
0 |
if (index($ok, 'OK') != -1) { } |
368
|
0 |
0 |
unless defined $profile |
383
|
0 |
0 |
unless (defined $position and $number) |
396
|
0 |
0 |
if (index($self->answer, 'OK') != -1) { } |
412
|
0 |
0 |
$lEnable ? : |
413
|
0 |
0 |
$lEnable ? : |
434
|
0 |
0 |
if @_ |
452
|
0 |
0 |
unless defined $cInit |
454
|
0 |
0 |
if ($cInit) |
464
|
0 |
0 |
if (ref $$me{'_log'}) { } |
476
|
0 |
0 |
if (@_) |
494
|
0 |
0 |
if ($me->ostype eq 'windoze') { } |
501
|
0 |
0 |
unless (ref $me->port) |
521
|
0 |
0 |
if ($oPort->can('read_interval')) |
529
|
0 |
0 |
unless ($oPort->write_settings) |
546
|
0 |
0 |
if ($rslt and $rslt =~ /^OK/) { } |
551
|
0 |
0 |
if (not $rslt) { } |
557
|
0 |
0 |
if ($aOpt{'max_reset_iter'}) |
563
|
0 |
0 |
defined $me->options->{'init_string'} ? : |
588
|
0 |
0 |
@_ ? : |
596
|
0 |
0 |
if (@_) |
603
|
0 |
0 |
if (defined $$self{'CONNECTED'} and $$self{'CONNECTED'} == 1 and not defined $port_obj && $port_obj) |
614
|
0 |
0 |
unless ($connect_options) |
623
|
0 |
0 |
unless (defined $port_obj and $port_obj) |
653
|
0 |
0 |
unless defined $ret |
669
|
0 |
0 |
if $me->ostype eq 'windoze' |
673
|
0 |
0 |
unless $port |
683
|
0 |
0 |
unless defined $expect |
684
|
0 |
0 |
unless defined $timeout |
689
|
0 |
0 |
$timeout ? : |
701
|
0 |
0 |
if (defined $timeout and $timeout > 0) |
703
|
0 |
0 |
if $end_time == $start_time |
713
|
0 |
0 |
if (defined $what and $howmany > 0) { } |
|
0 |
0 |
elsif ($end_time > 0) { } |
719
|
0 |
0 |
if (defined $expect) |
722
|
0 |
0 |
defined $copy && $copy =~ /$expect/ ? : |
723
|
0 |
0 |
if $done |
729
|
0 |
0 |
time >= $end_time ? : |
732
|
0 |
0 |
if ($done) |
762
|
0 |
0 |
if (defined $answer) |
781
|
0 |
0 |
if (defined $buff and $buff ne '') { } |
795
|
0 |
0 |
wantarray ? : |