| blib/lib/Tie/TinyURL.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 4 | 14 | 28.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 52 | 0 | 0 | 1 | ref $$self{'args'} eq 'HASH' and defined $$self{'args'}{'timeout'} |
| 66 | 1 | 0 | 2 | defined $url and length $url |
| 82 | 0 | 0 | 0 | defined $url and exists $$self{'seen'}{$url} |
| 94 | 0 | 0 | 0 | defined $url and exists $$self{'seen'}{$url} |
| line | l | !l | condition |
|---|---|---|---|
| 117 | 1 | 0 | $response->header('location') || undef |