| blib/lib/Encode/Unicode/UTF7.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 26 | 61.5 |
| line | true | false | branch |
|---|---|---|---|
| 32 | 1 | 9 | unless defined $str |
| 37 | 2109 | 2102 | if ($str =~ /\G($re_asis+)/cog) { } |
| 2102 | 0 | elsif ($str =~ /\G($re_encoded+)/cogs) { } | |
| 43 | 0 | 2102 | if ($1 eq '+') { } |
| 57 | 0 | 9 | if $chk |
| 64 | 1 | 9 | unless defined $bytes |
| 70 | 2109 | 2102 | if ($bytes =~ /\G([^+]+)/cog) { } |
| 0 | 2102 | elsif ($bytes =~ /\G\+-/cog) { } | |
| 2102 | 0 | elsif ($bytes =~ m[\G\+([A-Za-z0-9+/]+)-?]cogs) { } | |
| 0 | 0 | elsif ($bytes =~ /\G\+/cog) { } | |
| 79 | 2016 | 86 | if $pad |
| 83 | 0 | 0 | if $^W |
| 90 | 0 | 9 | if $chk |