diff options
| -rwxr-xr-x | datasets/get.pl | 6 | ||||
| -rwxr-xr-x[-rw-r--r--] | latest.pl | 0 |
2 files changed, 5 insertions, 1 deletions
diff --git a/datasets/get.pl b/datasets/get.pl index 531b9f7..14c5a5b 100755 --- a/datasets/get.pl +++ b/datasets/get.pl @@ -1,5 +1,9 @@ #!/usr/bin/perl foreach (@ARGV){ - my $s = $_; if ($s !~/\..*$/) { $s .= ".wav"; } system('/usr/bin/wget', 'https://neural:spawn5@asdf.us/neural/' . $s); } + my $s = $_; + if ($s !~/\..*$/) { $s .= ".wav"; } + system('/usr/bin/wget', 'https://neural:spawn5@asdf.us/neural/' . $s); + system('/usr/bin/perl', 'dataset.pl', $s); +} |