diff options
| author | jules on spawn <spawn@cortex> | 2018-04-10 17:49:13 +0200 |
|---|---|---|
| committer | jules on spawn <spawn@cortex> | 2018-04-10 17:49:13 +0200 |
| commit | 805a4fc2b3e406e0b1506fdfd54aa8750d289659 (patch) | |
| tree | 44e2e89e1d6bcf5fceff7bf6b782849691a02c33 | |
| parent | 860acac9862cd5ebe80d2a428d446dbdcc41d197 (diff) | |
counting samples again
| -rwxr-xr-x | latest.pl | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -32,7 +32,6 @@ sub process($){ while (readdir DIR) { next unless /wav$/; $c += 1; - last; } closedir DIR; @@ -52,6 +51,11 @@ sub process($){ if (! $epoch[0]) { return 0; } + + if (! $opt_l) { + print $name . ", $c samples\n"; + } + $epoch[0] =~ /(\d+)/; if ($1 < 4) { return 0; |
