| blib/lib/WWW/Pastebin/PastebinCa/Create.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 26 | 57.6 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 0 | 1 | if @_ & 1 |
| 41 | 0 | 1 | unless defined $content |
| 44 | 0 | 1 | if @_ & 1 |
| 59 | 0 | 1 | unless exists $Valid_Langs{$args{'lang'}} |
| 63 | 0 | 1 | if length $args{'expire'} and not exists $Valid_Expires{$args{'expire'}} |
| 71 | 0 | 1 | unless $mech->success |
| 74 | 0 | 1 | unless $mech->form_with_fields('content') |
| 86 | 0 | 1 | unless $set == 6 |
| 89 | 1 | 0 | unless $mech->click('s')->is_success |
| 97 | 0 | 0 | unless defined $uri |
| 178 | 1 | 2 | if (@_) |
| 184 | 1 | 1 | if (@_) |
| 190 | 2 | 4 | if (@_) |