| blib/lib/WWW/Pastebin/Bot/Pastebot/Create.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 2 | 12 | 16.6 |
| line | true | false | branch |
|---|---|---|---|
| 24 | 0 | 1 | unless get_args_as_hash(\@_, \my(%args), {'timeout', 30, 'site', 'http://p3m.org/pfn'}) |
| 44 | 0 | 0 | unless get_args_as_hash(\@_, \my(%args), {'channel', '', 'nick', '', 'summary', '', 'paste', $content}, [], ['channel', 'nick', 'summary', 'paste']) |
| 55 | 0 | 0 | unless defined $args{'paste'} |
| 62 | 0 | 0 | unless $response->code == 303 |
| 75 | 1 | 0 | if (@_) |
| 85 | 0 | 0 | if ($is_net) { } |