| blib/lib/WWW/Hashbang/Pastebin/Client.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 3 | 20 | 15.0 |
| line | true | false | branch |
|---|---|---|---|
| 14 | 0 | 1 | unless $args{'url'} |
| 15 | 0 | 1 | unless $args{'url'} =~ /^http/ |
| 18 | 1 | 0 | 'WWW::Hashbang::Pastebin::Client'->VERSION ? : |
| 32 | 0 | 0 | if ($args{'file'}) |
| 35 | 0 | 0 | unless open my $in, '<', $args{'file'} |
| 40 | 0 | 0 | unless $args{'paste'} |
| 46 | 0 | 0 | if $$post_response{'success'} |
| 62 | 0 | 0 | unless $id |
| 64 | 0 | 0 | if $id =~ /\Q$$self{'url'}\E/ |
| 72 | 0 | 0 | if $$get_response{'success'} |