Branch Coverage

blib/lib/QRCode/Encoder.pm
Criterion Covered Total %
branch 37 58 63.7


line true false branch
19 6 1 if $octets =~ /\A \d* \z/msux
20 1 0 if $octets =~ /\A [0-9A-Z\x20\x24\x25\x2a\x2b\x2d-\x2f\x3a]+ \z/msux
22 0 0 if $octets =~ /\A (?: # start of a pair (?: [\x81-\x9f\xe0-\xea] [\x40-\x7e\x80-\xfc]) | (?: \xeb [\x40-\x7e\x80\xbf]) )+ \z/msux
34 7 0 scalar(@args) % 2 ? :
40 0 7 if $min_version eq 40
44 2 5 if $min_level eq "H"
46 3 4 if (defined $level) { }
2 2 elsif (defined $version) { }
47 0 3 unless my $minv = qrspec_min_version_for($mode, $size, $level)
49 0 3 if (defined $version) { }
50 0 0 if $version < $minv
55 0 3 $minv < $req ? :
61 0 2 if $rank_for->{$candidate} < $min_rank
63 2 0 if ($minv <= $version)
68 0 2 unless defined $level
76 2 0 $minv <= $req ? :
78 2 6 if $rank_for->{$candidate} <= $min_rank
80 2 4 if $altv > $minv
109 1798 3782 $_ & 1 ? :
123 0 4 unless my $encoder = $encoder_for->{$mode}
142 0 4 if $residual_bits < 0
143 4 0 $residual_bits >= 4 ? :
146 4 0 if (my $pad1 = $residual_bits % 8)
152 1 35 if $residual_bits == 8
183 6 2 if @$strings == 1
189 4 196 if $i >= length $string
205 18 0 $r >= 3 ? :
220 1 5 if ($r == 1) { }
240 0 0 $v <= 40956 ? :