| blib/lib/NetServer/Portal.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 17 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 129 | 0 | 0 | 0 | $to and $to eq 'back' |
| 132 | 0 | 0 | 0 | $to and $to eq ref $$o{'screen'} |
| 143 | 0 | 0 | 0 | $to and not exists $$o{'screens'}{$to} |
| line | l | !l | condition |
|---|---|---|---|
| 171 | 0 | 0 | $$NetServer::Portal::StoreTop{$user}{$pkg} ||= bless({}, $pkg) |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 57 | 0 | 0 | 0 | $port || $NetServer::Portal::BasePort + $$ % 1000 |
| 97 | 0 | 0 | 0 | gethostbyaddr($iaddr, 2) || inet_ntoa($iaddr) |