blib/lib/Net/MirapointAdmin.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 11 | 53 | 20.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
286 | 0 | 0 | 0 | $name eq 'error' and $$self{'debug'} |
402 | 1 | 0 | 0 | defined $args{'ssl'} and $args{'ssl'} > 0 |
590 | 0 | 0 | 0 | defined $line and $line =~ /\{[0-9]+\}\n*$/ |
741 | 0 | 0 | 0 | $self->okno =~ /^NO/ and $self->okno =~ /$regexp/ |
line | l | !l | condition |
---|---|---|---|
396 | 0 | 1 | $args{'exception'} || \&_default_exception |
397 | 0 | 1 | $args{'debug'} || 0 |
398 | 0 | 1 | $args{'ignore_handshake'} || 0 |
399 | 0 | 1 | $args{'debugfunc'} || undef |
410 | 0 | 0 | $args{'port'} || 10243 |
414 | 0 | 1 | $args{'port'} || 10143 |
955 | 1 | 0 | shift() || 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
222 | 0 | 0 | 2 | not defined $@ or $@ ne '' |
278 | 6 | 0 | 0 | ref $self || croak("$self is not an object.") |
375 | 0 | 1 | 0 | ref $that || $that |
382 | 1 | 0 | 0 | $#_ < 1 or $_[0] ne 'host' |
561 | 0 | 0 | 0 | $line =~ /^$tag OK/ or $line =~ /^$tag NO/ |
623 | 0 | 0 | 0 | $lit eq '' or $lit =~ /\n$/ |
741 | 0 | 0 | 0 | $self->okno =~ /^OK/ or $self->okno =~ /^NO/ and $self->okno =~ /$regexp/ |
839 | 0 | 0 | 0 | /^$/ or /[\(\)\s]/ |
0 | 0 | 0 | /^$/ or /[\(\)\s]/ or $quoteme |