Branch Coverage

blib/lib/Compress/LZW/Progressive.pm
Criterion Covered Total %
branch 41 108 37.9


line true false branch
42 6 0 if (not $which or $which eq 'compress')
47 6 0 if (not $which or $which eq 'decompress')
69 0 0 $#char > 20 ? :
0 8556 if $debug
73 0 8556 unless defined $code
76 0 8556 unless length $phrase
79 0 8556 if $debug
84 86 8470 unless (defined $char[0])
85 0 86 if $debug
90 3 8467 if ($dict->codes_used + 1 == $$self{'code_max'})
93 3 0 if (my(@delete) = $dict->least_used_codes($delete_max_old_codes)) { }
94 0 3 if $debug
95 0 3 unless $dict->delete_codes(@delete)
107 0 0 if $debug
112 0 0 if $debug
119 0 8470 if $debug
122 0 86 if $debug
148 89 8556 if ($code >= $$self{'code_max'})
149 0 89 if $debug
151 0 89 if ($code == $$self{'code_max'}) { }
86 3 elsif ($code == $$self{'code_end_segment'}) { }
0 3 elsif ($code == $$self{'code_delete_start'}) { }
3 0 elsif ($code == $$self{'code_delete_count'}) { }
152 0 0 if $debug
161 0 86 if $debug
167 0 0 if $delete_code == $$self{'code_delete_end'}
178 0 3 if (int @delete != $delete_count)
181 0 3 if $debug
183 0 2874 unless ($$dict[$delete_code])
195 8553 3 if (defined $$dict[$code]) { }
198 0 8553 if $debug
199 8467 86 if (defined $last_code)
200 2596 5871 @$reuse ? :
202 0 8467 if $debug
204 0 8553 if $debug
208 0 3 @$reuse ? :
211 0 3 if $debug
213 8470 86 if defined $next_code
236 0 0 if ($@)
243 0 0 if (not $type or $type eq 'compress')
250 0 0 if $devel_size
254 0 0 if ($phrases)
262 0 0 unless defined $phrase
264 0 0 if $length < $smallest
267 0 0 if $length > $largest
275 0 0 if (not $type or $type eq 'decompress')
280 0 0 if $devel_size
294 0 0 $#{$comp;} > $#{$decomp;} ? :
302 0 0 if ($num < 32 || $num == 127 || $num > 128 and $num != 10) { }
303 0 0 if (defined $char_map[$num]) { }
316 0 0 defined $$comp[$i] ? :
317 0 0 defined $$decomp[$i] ? :
318 0 0 if $c eq $d
320 0 0 $c eq $d ? :