env

1 files changed, 5 insertions, 5 deletions

diff --git a/get.pl b/get.pl
index 59b84f0..470dd6b 100755
--- a/get.pl
+++ b/get.pl
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 
-use DotenvSimple;
-DotenvSimple::source_dotenv('.env');
+#use DotenvSimple;
+#DotenvSimple::source_dotenv('.env');
 
 $SIG{TERM} = $SIG{INT} = sub { exit 1 };
 
@@ -36,7 +36,7 @@ foreach my $s (@ARGV){
       system('rm', $fn);
       system('rm', $clean_fn);
       print "downloading $clean_fn\n";
-      system($ENV{'WGET_BIN'}, '-O', $clean_fn, $s);
+      system(`which wget`, '-O', $clean_fn, $s);
       system('/usr/bin/perl', 'dataset.pl', $clean_fn);
       $fn = $clean_fn;
     } else {
@@ -59,8 +59,8 @@ foreach my $s (@ARGV){
   } else {
     if ($s !~/\..*$/) { $s .= ".wav"; }
     print "downloading $s\n";
-    system('/usr/bin/wget', 'https://neural:spawn5@asdf.us/neural/' . $s);
-    system('/usr/bin/perl', 'dataset.pl', $s);
+    system(`which wget`, 'https://neural:spawn5@asdf.us/neural/' . $s);
+    system(`which wget`, 'dataset.pl', $s);
   }
   my $tag = sanitize($fn);
   open(my $fd, ">>../run_slap.sh");