summaryrefslogtreecommitdiff
path: root/dir-to-movie.pl
diff options
context:
space:
mode:
Diffstat (limited to 'dir-to-movie.pl')
-rwxr-xr-xdir-to-movie.pl8
1 files changed, 8 insertions, 0 deletions
diff --git a/dir-to-movie.pl b/dir-to-movie.pl
index 7bc48c5..7e74eec 100755
--- a/dir-to-movie.pl
+++ b/dir-to-movie.pl
@@ -3,6 +3,13 @@
my $tag = $ARGV[0] or "pix2pixhd_" . time;
$tag =~ s/\....$//;
+if (! -e "results/$tag") {
+ print "usage: $0 [tag]\n";
+ exit(1);
+}
+
+chdir('results/$tag');
+
my $i = 0;
my $ls = `ls -1v *.png`;
my @lines = split('\n', $ls);
@@ -28,4 +35,5 @@ system("ffmpeg",
END {
system('rm', '-rf', 'tmp');
+ chdir('../..');
}