Branch Coverage

blib/lib/D64/File/PRG.pm
Criterion Covered Total %
branch 48 112 42.8


line true false branch
85 0 15 if $verbose
87 0 15 if (defined $file) { }
92 0 15 unless (defined $loading_address)
99 0 15 if $verbose
108 1 17 unless (looks_like_number $loading_address)
112 0 17 if $verbose
113 0 17 if ($loading_address < 0 or $loading_address > 65535)
116 0 17 if $verbose
134 0 0 unless (-e $file)
139 0 0 if $verbose
140 0 0 unless open my $fh, '<', $file
143 0 0 unless close $fh
144 0 0 if $verbose
164 1 19 unless (ref $raw_data_ref eq 'SCALAR')
165 0 1 ref $raw_data_ref ? :
170 0 19 if $verbose
175 0 116 if ($byte_value < 0 or $byte_value > 255)
182 0 19 if $verbose
193 0 2 if $verbose
198 0 2 if $verbose
208 0 4 if $verbose
210 0 4 defined $file ? :
211 1 3 if ($bytes_count != 1)
215 1 2 if ($bytes_count != 1)
220 0 2 if $verbose
240 4 12 unless defined $format
244 14 2 if ($format eq 'RAW') { }
2 0 elsif ($format eq 'ASM') { }
245 0 14 if $verbose
247 9 5 if $loading_address_included
251 2 0 unless defined $loading_address_included
252 0 2 if $verbose
254 0 2 if (not $row_length =~ /^\d+$/ or $row_length < 1 or $row_length > 255)
258 2 0 if ($loading_address_included)
290 3 3 if ($offset % $row_length == 0)
291 1 2 if ($offset != 0)
301 2 0 if $line =~ /, $/i
351 1 3 unless (defined $loading_address)
356 0 2 if $verbose
375 3 1 if exists $params{'LOADING_ADDRESS'}
419 0 0 if $verbose
421 0 0 if (-e $file)
422 0 0 if (not $overwrite) { }
426 0 0 if $verbose
429 0 0 unless open my $fh, '>', $file
433 0 0 unless close $fh
434 0 0 if $verbose
444 0 0 if $verbose
447 0 0 if ($bytes_written != 1)
452 0 0 if $verbose
464 0 0 if $verbose
466 0 0 if ($bytes_count != 1)
470 0 0 if ($bytes_count != 1)
474 0 0 if $verbose
483 0 5 if $package eq 'main'
484 5 0 if ($error) { }