blib/lib/Egg/View/Mail/Plugin/PortCheck.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 0 | 9 | 0.0 |
line | l | !l | condition |
---|---|---|---|
18 | 0 | 0 | $$c{'scan_host'} ||= 'localhost' |
19 | 0 | 0 | $$c{'scan_port'} ||= 25 |
20 | 0 | 0 | $$c{'scan_timeout'} ||= 3 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
27 | 0 | 0 | 0 | $self->scan || do { my $scan = $self->e->port_scan(@{$c;}{'scan_host', 'scan_port'}, 'timeout', $$c{'scan_timeout'}); $self->scan($scan) } |