From 53a37441cfa3b79a4387ff47a9c2c39e785e6fc3 Mon Sep 17 00:00:00 2001
From: Jules Laplace <julescarbon@gmail.com>
Date: Thu, 13 Sep 2018 20:13:29 +0200
Subject: print curl output

---
 dir-to-movie.pl | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/dir-to-movie.pl b/dir-to-movie.pl
index 0e85b73..f97953d 100755
--- a/dir-to-movie.pl
+++ b/dir-to-movie.pl
@@ -75,9 +75,13 @@ for my $line (@lines) {
 
 if (defined $endpoint) {
   print("upload to $endpoint\n");
-  print("$module $tag $parent_dir/renders/$tag.mp4\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";
+  print $curl . "\n\n";
 
   # system("curl",
   #   "-X", "POST",
-- 
cgit v1.2.3-70-g09d2