| blib/lib/MIME/Base64/Perl.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 16 | 87.5 |
| line | true | false | branch |
|---|---|---|---|
| 16 | 271 | 0 | if ($] >= 5.006) |
| 18 | 1 | 270 | if (&bytes::length($_[0]) > length $_[0] or $] >= 5.008 and $_[0] =~ /[^\0-\xFF]/) |
| 29 | 1 | 269 | unless defined $eol |
| 39 | 263 | 7 | if $padding |
| 41 | 1 | 269 | if (length $eol) |
| 55 | 4 | 279 | if (length($str) % 4) |
| 61 | 3 | 280 | unless length $str |
| 75 | 280 | 0 | if ($str ne '') |