| line |
true |
false |
branch |
|
51
|
0 |
2 |
ref $file eq 'GLOB' ? : |
|
62
|
0 |
2 |
unless (defined $handle) |
|
69
|
0 |
2 |
if ($Audio::Wav::_has_inline) { } |
|
75
|
0 |
2 |
if ($tools and $tools->is_debug) |
|
91
|
0 |
0 |
unless $self |
|
92
|
0 |
0 |
if (exists $$self{'handle'} and defined $$self{'handle'}) |
|
95
|
0 |
0 |
if (exists $$self{'tools'}) |
|
132
|
0 |
0 |
unless exists $$self{'data'}{'info'} |
|
177
|
0 |
2 |
unless exists $$self{'data'}{'cue'} |
|
184
|
4 |
0 |
if exists $$data{'labl'}{$id} |
|
185
|
4 |
0 |
if exists $$data{'note'}{$id} |
|
203
|
0 |
44 |
if ($$self{'pos'} + $len > $data_finish) |
|
228
|
1 |
168 |
unless $len and $len > 0 |
|
260
|
2 |
0 |
if ($$details{'bits_sample'} <= 8) { } |
|
|
0 |
0 |
elsif ($$details{'bits_sample'} == 16) { } |
|
|
0 |
0 |
elsif ($$details{'bits_sample'} <= 32) { } |
|
267
|
0 |
0 |
if ($$self{'tools'}->is_big_endian) { } |
|
308
|
0 |
2 |
if ($Audio::Wav::_has_inline) { } |
|
309
|
0 |
0 |
$$self{'tools'}->is_big_endian ? : |
|
313
|
0 |
1 |
unless defined $val |
|
314
|
0 |
2 |
if $@ |
|
359
|
1 |
2 |
if ($pos) { } |
|
360
|
0 |
1 |
if $pos < 0 |
|
365
|
1 |
2 |
if ($pos > $$self{'pos'}) |
|
367
|
0 |
1 |
if $pos > $max_pos |
|
369
|
3 |
0 |
if (seek $$self{'handle'}, $pos, 0) { } |
|
388
|
0 |
0 |
unless defined $pos |
|
486
|
0 |
2 |
unless ($type eq 'RIFF' and $subtype eq 'WAVE') |
|
494
|
0 |
11 |
if ($walkover) { } |
|
498
|
0 |
0 |
if $debug |
|
503
|
0 |
11 |
if $debug |
|
504
|
2 |
9 |
if ($head eq 'fmt ') { } |
|
|
2 |
7 |
elsif ($head eq 'cue ') { } |
|
|
1 |
6 |
elsif ($head eq 'smpl') { } |
|
|
3 |
3 |
elsif ($head eq 'LIST') { } |
|
|
1 |
2 |
elsif ($head eq 'DISP') { } |
|
|
2 |
0 |
elsif ($head eq 'data') { } |
|
507
|
0 |
2 |
if ($comp == 65534) { } |
|
|
0 |
2 |
elsif ($comp != 1) { } |
|
540
|
0 |
2 |
if ($chunk_len % 2) |
|
542
|
0 |
0 |
if ($pad =~ /\w/ and $old_cooledit and $head eq 'data') |
|
557
|
2 |
0 |
if (exists $details{'data_start'}) { } |
|
577
|
2 |
1 |
if ($note eq 'adtl') { } |
|
|
1 |
0 |
elsif ($note eq 'INFO') { } |
|
582
|
1 |
8 |
if ($head eq 'ltxt') { } |
|
589
|
8 |
0 |
if ($head eq 'labl' or $head eq 'note') { } |
|
597
|
4 |
4 |
if ($bits % 2) |
|
604
|
0 |
2 |
if ($pos > $length) |
|
616
|
1 |
0 |
if ($allowed{$head}) |
|
620
|
1 |
0 |
if ($bits % 2) |
|
675
|
0 |
1 |
if ($read_bytes < $length) |
|
679
|
0 |
1 |
if ($length % 2) |
|
695
|
4 |
3 |
if ($plain) |
|
698
|
20 |
4 |
unless $$fields[$id] eq $field |
|
706
|
4 |
41 |
if (exists $plain{$id}) { } |