| blib/lib/POE/Filter/Ident.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 16 | 43.7 |
| line | true | false | branch |
|---|---|---|---|
| 29 | 0 | 0 | if @_ |
| 39 | 0 | 1 | if $$self{'debug'} |
| 40 | 0 | 1 | unless $line =~ /\S/ |
| 47 | 0 | 1 | unless (defined $reply) |
| 51 | 0 | 1 | if ($replytype eq 'ERROR') |
| 57 | 1 | 0 | if ($replytype eq 'USERID') |
| 59 | 0 | 1 | unless (($opsys, $userid) = $reply =~ /\s*((?:[^\\:]+|\\.)*):(.*)$/) |
| 87 | 1 | 0 | unless ($opsys =~ /,/ or $opsys eq 'OTHER') |