| blib/lib/AnyEvent/Finger/Request.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 16 | 87.5 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 0 | 18 | defined $self->{'verbose'} ? : |
| 9 | 9 | $self->{'raw'} =~ m[^/W] ? : | |
| 28 | 22 | 17 | unless (defined $self->{'username'}) |
| 30 | 22 | 0 | if ($self->{'raw'} =~ m[^(?:/W\s*)?([^\@]*)]) |
| 41 | 26 | 28 | if defined $self->{'hostnames'} |
| 42 | 14 | 14 | $self->{'raw'} =~ /\@(.*)$/ ? : |
| 53 | 2 | 6 | (shift())->username eq '' ? : |
| 57 | 13 | 10 | @{(shift())->hostnames;} > 0 ? : |