| blib/lib/Net/Discident.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 14 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 34 | 2 | 0 | unless defined $fingerprint or defined $path |
| 37 | 0 | 1 | unless defined $fingerprint |
| 52 | 1 | 4 | if defined $ident |
| 64 | 0 | 3 | unless my $code = $http->request($uri) |
| 67 | 0 | 3 | unless 200 == $code |
| 70 | 0 | 3 | if $raw |
| 89 | 0 | 0 | if -d $_ |