Branch Coverage

lib/Encode/Unicode/UTF7.pm
Criterion Covered Total %
branch 12 22 54.5


line true false branch
37 2107 2100 if ($str =~ /\G($re_asis+)/cog) { }
2100 0 elsif ($str =~ /\G($re_encoded+)/cogs) { }
43 0 2100 if ($1 eq '+') { }
57 0 7 if $chk
69 2107 2100 if ($bytes =~ /\G([^+]+)/cog) { }
0 2100 elsif ($bytes =~ /\G\+-/cog) { }
2100 0 elsif ($bytes =~ m[\G\+([A-Za-z0-9+/]+)-?]cogs) { }
0 0 elsif ($bytes =~ /\G\+/cog) { }
78 2014 86 if $pad
82 0 0 if $^W
89 0 7 if $chk