Branch Coverage

blib/lib/Text/Sprintf/Zenkaku.pm
Criterion Covered Total %
branch 54 54 100.0


line true false branch
22 89 25 if ($w >= 0) { }
47 314 555 if ($state eq 'IDL') { }
377 178 elsif ($state eq 'READ_FORMAT') { }
46 132 elsif ($state eq 'READ_ARGUMENT_NUMBER') { }
48 187 127 if ($s eq '%') { }
55 3 374 if ($s eq '%') { }
123 251 elsif ($s eq 's') { }
59 192 elsif ($s =~ /$conversions/) { }
27 165 elsif ($s eq '*') { }
109 56 elsif ($s =~ /\A[0-9]\Z/) { }
55 1 elsif ($s =~ /\A[-+ #\.v]\Z/) { }
65 7 116 if ($tmp =~ /^%([1-9][0-9]*)\$( *)\*([1-9][0-9]*)\$s$/) { }
2 114 elsif ($tmp =~ /^%([1-9][0-9]*)\$( *)\*s$/) { }
2 112 elsif ($tmp =~ /^%([1-9][0-9]*)\$( *)(-?[0-9]+)s$/) { }
1 111 elsif ($tmp =~ /^%([1-9][0-9]*)\$( *)s$/) { }
9 102 elsif ($tmp =~ /^%( *)\*([1-9][0-9]*)\$s$/) { }
4 98 elsif ($tmp =~ /^%( *)\*s$/) { }
90 8 elsif ($tmp =~ /^%( *)(-?[0-9]+)s$/) { }
74 6 1 if (not exists $is_uniq->{$w_index}) { }
90 1 1 if (not exists $is_uniq->{$w_index}) { }
123 8 1 if (not exists $is_uniq->{$w_index}) { }
142 2 2 if (not exists $is_uniq->{$w_index}) { }
186 2 53 if ($tmp =~ /\*v/)
193 19 27 if ($s =~ /\A[0-9]\Z/) { }
19 8 elsif ($s eq '$') { }
205 23 109 if ($s =~ /\A[0-9]\Z/) { }
12 97 elsif ($s eq '$') { }