specify which experiment to process

1 files changed, 12 insertions, 0 deletions

diff --git a/latest.pl b/latest.pl
index 4975a0a..c09a5cd 100755
--- a/latest.pl
+++ b/latest.pl
@@ -7,6 +7,14 @@ our $opt_l; # mix and upload files
 our $opt_v; # print log for all files
 getopts('lav');
 
+our $matches = 0;
+if (scalar @ARGV) {
+  $matches = {};
+  for (@ARGV) {
+    my ($name, $ep) = split("-", $_, 2);
+    $matches->{$name} = 1;
+  }
+}
 # my $s = "results/exp:03_responses-frame_sizes:8,2-n_rnn:2-dataset:03_responses/checkpoints/best-ep1-it1035";
 sub process($){
   my ($dir) = @_;
@@ -35,6 +43,10 @@ sub process($){
   }
   closedir DIR;
 
+  if ($matches && ! exists $matches->{$name}) {
+    return 0;
+  }
+
   if ($opt_v) {
     print $name . "\n";
     print `grep valid $log`;