| blib/lib/Audio/Analyzer/ToneDetect.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 18 | 33 | 54.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 27 | 1 | 0 | 2 | $$self{'valid_tones'} and $$self{'valid_tones'} eq 'builtin' |
| 84 | 6 | 84 | 10 | @buff == $chunks_required and _all_match(\@buff) |
| 140 | 0 | 0 | 3 | $_[0] != 0 && ($_[0] & $_[0] - 1) == 0 |
| line | l | !l | condition |
|---|---|---|---|
| 18 | 3 | 0 | delete $args{'source'} || \*STDIN |
| 19 | 0 | 3 | delete $args{'sample_rate'} || 16000 |
| 20 | 0 | 3 | delete $args{'chunk_size'} || 1024 |
| 21 | 0 | 3 | delete $args{'chunk_max'} || 70 |
| 22 | 0 | 3 | delete $args{'min_tone_length'} || 0.5 |
| 25 | 0 | 3 | delete $args{'rejected_freqs'} || [] |
| 100 | 3 | 0 | $self->get_next_tone($tone_a_length) || (return) |
| 101 | 3 | 0 | $self->get_next_tone($tone_b_length) || (return) |
| 133 | 301 | 84 | $_ == $$l[0] or return 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 70 | 0 | 10 | 0 | $chunks_required ||= $$self{'chunks_required'} |
| 115 | 6 | 0 | 0 | $upper ||= $lower |