diff options
| -rwxr-xr-x | dir-to-movie.pl | 28 |
1 files changed, 10 insertions, 18 deletions
diff --git a/dir-to-movie.pl b/dir-to-movie.pl index f97953d..b109415 100755 --- a/dir-to-movie.pl +++ b/dir-to-movie.pl @@ -75,24 +75,16 @@ for my $line (@lines) { if (defined $endpoint) { print("upload to $endpoint\n"); - print("$module $tag $parent_dir/renders/$tag.mp4\n\n"); - my $curl_cmd = "curl -X POST -F module=$module -F activity=live -F generated=true -F dataset=$tag -F datatype=video -F file=@$parent_dir/renders/$tag.mp4 $endpoint"; - print `pwd` . "\n"; - print $curl_cmd . "\n\n"; - - my $curl = `curl -X POST -F module=$module -F activity=live -F generated=true -F dataset=$tag -F datatype=video -F file=@$parent_dir/renders/$tag.mp4 $endpoint`; - print $curl . "\n\n"; - - # system("curl", - # "-X", "POST", - # "-F", "module=$module", - # "-F", "activity=live", - # "-F", "generated=true", - # "-F", "dataset=$tag", - # "-F", "datatype=video", - # "-F", "file=@$parent_dir/renders/$tag.mp4", - # $endpoint - # ); + system("curl", + "-X", "POST", + "-F", "module=$module", + "-F", "activity=live", + "-F", "generated=true", + "-F", "dataset=$tag", + "-F", "datatype=video", + "-F", "file=\@$parent_dir/renders/$tag.mp4", + $endpoint + ); } print "rendered: $tag.mp4\n"; |