| line |
true |
false |
branch |
|
117
|
5 |
5 |
if $l->{'error'} |
|
123
|
0 |
40 |
if (@_ and @_ % 2) |
|
135
|
10 |
0 |
unless ref $self |
|
139
|
5 |
5 |
if $self->{'error'} |
|
146
|
0 |
10 |
unless ref $self |
|
150
|
5 |
5 |
if $self->{'error'} |
|
156
|
0 |
40 |
unless ref $self |
|
168
|
0 |
40 |
unless (defined $filename) |
|
172
|
8 |
32 |
unless (-f $filename) |
|
176
|
32 |
0 |
if (open my $in, '<', $filename) { } |
|
186
|
12 |
20 |
if ($header ne '4c') |
|
201
|
40 |
100 |
if ($flag_bit eq '1') |
|
202
|
40 |
0 |
if ($flag_cnt >= 0 and $flag_cnt <= 6) |
|
212
|
20 |
0 |
if ($flag_bits[1] == 1) |
|
217
|
28 |
232 |
if $file_bit |
|
292
|
8 |
12 |
if ($vol_flags =~ /10/) |
|
298
|
4 |
16 |
if ($vol_flags =~ /01/) |
|
304
|
8 |
12 |
if ($vol_flags =~ /11/) |
|
312
|
8 |
12 |
if ($vol_bits[0] == 1 and $vol_bits[1] == 0) |
|
358
|
2 |
6 |
if ($resolve) |
|
366
|
4 |
14 |
if ($vol_bits[0] == 0 and $vol_bits[1] == 1) |
|
375
|
0 |
4 |
if ($net_share_name_loc ne '20') |
|
385
|
1 |
3 |
if ($resolve) |
|
395
|
3 |
0 |
if ($net_share_mdrive ne '0') |
|
402
|
8 |
9 |
if ($vol_bits[0] == 1 and $vol_bits[1] == 1) |
|
410
|
200 |
8 |
if ($net_share_name_loc ne '20') |
|
423
|
0 |
8 |
if ($net_share_name_loc ne '20') |
|
433
|
2 |
6 |
if ($resolve) |
|
443
|
0 |
6 |
if ($net_share_mdrive ne '0') |
|
463
|
0 |
15 |
if ($flag_bits[2] eq '1') |
|
470
|
0 |
15 |
if ($flag_bits[3] eq '1') |
|
476
|
6 |
9 |
if ($flag_bits[4] eq '1') |
|
482
|
0 |
15 |
if ($flag_bits[5] eq '1') |
|
489
|
0 |
15 |
if ($flag_bits[6] eq '1') |
|
501
|
15 |
6 |
if ($tmp_len ne '0') { } |
|
516
|
0 |
781 |
unless seek $self->{'_fh'}, $loc, 0 |
|
526
|
0 |
23 |
unless seek $self->{'_fh'}, $loc, 0 |
|
536
|
0 |
60 |
unless seek $self->{'_fh'}, $loc, 0 |
|
559
|
589 |
60 |
length $HEXDATE < 16 ? : |
|
577
|
0 |
38 |
unless seek $self->{'_fh'}, $loc, 0 |
|
580
|
32 |
6 |
if $term_data |