From 4154b89a772bbb8bb61d69b823485a74209b9b23 Mon Sep 17 00:00:00 2001
From: jules <jules@asdf.us>
Date: Tue, 10 Apr 2018 00:40:42 +0200
Subject: dataset only process audio

---
 datasets/dataset.pl | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'datasets')

diff --git a/datasets/dataset.pl b/datasets/dataset.pl
index 4e3b9a9..8b77af9 100755
--- a/datasets/dataset.pl
+++ b/datasets/dataset.pl
@@ -20,6 +20,10 @@ FMT
 sub process($) {
   my $filename = shift or die "Usage: $0 [...filenames]\n";
   my ($name, $ext) = split(/\./, $filename, 2);
+  if ($ext !~ /(wav|mp3|aiff?|flac)/) {
+    print "not a valid file extension: $ext\n";
+    return;
+  }
 
   my $soxi = `soxi $filename`;
   my @lines = split("\n", $soxi);
-- 
cgit v1.2.3-70-g09d2