| blib/lib/Device/Modem.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 92 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 96 | 0 | 0 | 0 | $aOpt{'ostype'} eq 'windoze' and $aOpt{'log'} =~ /syslog/i |
| 115 | 0 | 0 | 0 | ref $aOpt{'_log'} and $aOpt{'_log'}->can('loglevel') |
| 384 | 0 | 0 | 0 | defined $position and $number |
| 542 | 0 | 0 | 0 | $iter < $aOpt{'max_reset_iter'} and $ok < 2 |
| 0 | 0 | 0 | $iter < $aOpt{'max_reset_iter'} and $ok < 2 and $blank < 3 | |
| 547 | 0 | 0 | 0 | $rslt and $rslt =~ /^OK/ |
| 604 | 0 | 0 | 0 | defined $self->{'CONNECTED'} and $self->{'CONNECTED'} == 1 |
| 0 | 0 | 0 | defined $port_obj && $port_obj | |
| 0 | 0 | 0 | defined $self->{'CONNECTED'} and $self->{'CONNECTED'} == 1 and not defined $port_obj && $port_obj | |
| 624 | 0 | 0 | 0 | defined $port_obj and $port_obj |
| 688 | 0 | 0 | 0 | defined $expect && $expect ne '' |
| 702 | 0 | 0 | 0 | defined $timeout and $timeout > 0 |
| 714 | 0 | 0 | 0 | defined $what and $howmany > 0 |
| 723 | 0 | 0 | 0 | defined $copy && $copy =~ /$expect/ |
| 782 | 0 | 0 | 0 | defined $buff and $buff ne '' |
| line | l | !l | condition |
|---|---|---|---|
| 93 | 0 | 0 | $aOpt{'log'} ||= 'file' |
| 97 | 0 | 0 | $aOpt{'loglevel'} ||= 'warning' |
| 138 | 0 | 0 | $timeout ||= 30 |
| 233 | 0 | 0 | $self->options->{'port'} || '' |
| 489 | 0 | 0 | $aOpt{'max_reset_iter'} ||= 0 |
| 568 | 0 | 0 | $me->send_init_string($init_string) || '' |
| 690 | 0 | 0 | $expect || '' |
| 700 | 0 | 0 | $timeout || 'undef' |
| 748 | 0 | 0 | $answer || '' |
| 768 | 0 | 0 | $answer || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 79 | 0 | 0 | 0 | ref $proto || $proto |
| 90 | 0 | 0 | 0 | $aOpt{'port'} ||= $Device::Modem::DEFAULT_PORT |
| 141 | 0 | 0 | 0 | $mode =~ /VOICE/i or $number =~ /;/ |
| 192 | 0 | 0 | 0 | index($ans, 'CONNECT') > -1 or index($ans, 'RING') > -1 |
| 484 | 0 | 0 | 0 | $aOpt{'baudrate'} ||= $Device::Modem::BAUDRATE |
| 485 | 0 | 0 | 0 | $aOpt{'databits'} ||= $Device::Modem::DATABITS |
| 486 | 0 | 0 | 0 | $aOpt{'parity'} ||= $Device::Modem::PARITY |
| 487 | 0 | 0 | 0 | $aOpt{'stopbits'} ||= $Device::Modem::STOPBITS |
| 488 | 0 | 0 | 0 | $aOpt{'handshake'} ||= $Device::Modem::HANDSHAKE |