1 files changed, 9 insertions, 2 deletions
diff --git a/latest.pl b/latest.pl
index 33bfb73..cd86de2 100755
--- a/latest.pl
+++ b/latest.pl
@@ -3,8 +3,9 @@
 use strict;
 use Getopt::Std;
 
-our $opt_l;
-getopts('l');
+our $opt_l; # mix and upload files
+our $opt_v; # print log for all files
+getopts('lav');
 
 # my $s = "results/exp:03_responses-frame_sizes:8,2-n_rnn:2-dataset:03_responses/checkpoints/best-ep1-it1035";
 sub process($){
@@ -14,6 +15,7 @@ sub process($){
   my $ep;
   my $path = "results/" . $dir . "/";
   my $chex = $path . "checkpoints/";
+  my $log = $path . 'log';
   return 0 unless -e $chex;
   opendir DIR, $chex or die $!;
   while (readdir DIR) {
@@ -47,6 +49,11 @@ sub process($){
   if ($1 < 4) {
     return 0;
   }
+
+  if ($opt_v) {
+    print `grep valid $log`;
+  }
+
   if (-e "output/" . $name . ".mp3") {
     return 1;
   }