| blib/lib/Hubot/Scripts/shorten.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 20 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 0 | 0 | if (length $bitly > 50 and $ENV{'HUBOT_BITLY_USERNAME'} and $ENV{'HUBOT_BITLY_API_KEY'}) |
| 33 | 0 | 0 | unless $res->is_success |
| 43 | 0 | 0 | if not $body or !$$hdr{'Status'} =~ /^2/ |
| 47 | 0 | 0 | if (grep {m[^image/.+$]i;} @ct || grep({not /text/i;} @ct)) |
| 59 | 0 | 0 | if ("@{[@charset_lines];}" =~ /charset=(?:'([^']+?)'|"([^"]+?)"|([a-zA-Z0-9_-]+)\b)/) |
| 66 | 0 | 0 | unless ($charset) |
| 68 | 0 | 0 | if ($ct =~ /charset\s*=\s*(.*)$/i) { } |
| 77 | 0 | 0 | if $charset =~ /ksc5601/i |
| 79 | 0 | 0 | if ($@) |
| 84 | 0 | 0 | unless $title |