| line |
true |
false |
branch |
|
73
|
1 |
3 |
if (exists $params{'bytes'} and exists $params{'org'}) |
|
77
|
9 |
5 |
unless (exists $params{'size'}) |
|
78
|
1 |
8 |
if (exists $params{'bytes'}) { } |
|
84
|
10 |
4 |
unless (exists $params{'bytes'}) |
|
88
|
1 |
13 |
if length $params{'bytes'} != $params{'size'} |
|
90
|
3 |
10 |
if (exists $params{'file'}) |
|
91
|
1 |
2 |
if (-e $params{'file'}) { } |
|
102
|
3 |
10 |
$params{'file'} ? : |
|
132
|
1 |
2 |
if ($self->{'endianness'} eq 'BIG') |
|
139
|
4 |
23 |
if $addr < 0 or $addr > $self->{'size'} - 1 |
|
167
|
1 |
1 |
if ($self->{'endianness'} eq 'BIG') |
|
176
|
2 |
11 |
if $value < 0 or $value > 255 |
|
177
|
2 |
9 |
if $addr < 0 or $addr > $self->{'size'} - 1 |
|
181
|
3 |
6 |
if exists $self->{'file'} |
|
190
|
0 |
10 |
unless open my $fh, $file |
|
194
|
1 |
9 |
unless length $contents == $size |
|
212
|
0 |
9 |
unless open my $fh, '>', $file |