diff options
| -rw-r--r-- | splice.pl | 31 |
1 files changed, 15 insertions, 16 deletions
@@ -90,22 +90,21 @@ for my $filename (@sequence_files) { if (defined $endpoint) { print("post to $endpoint\n"); - print(join("\n", - [ - "curl", - "-X", "POST", - "-F", "folder_id=$folder_id", - "-F", "module=$module", - "-F", "name=$dataset.mov", - "-F", "url=https://s3.amazonaws.com/i.asdf.us/cortex/lens/data/$folder_id/$dataset.mov", - "-F", "dataset=$dataset", - "-F", "activity=splice", - "-F", "generated=false", - "-F", "processed=true", - "-F", "datatype=video", - $endpoint - ] - )); + my $cmd = [ + "curl", + "-X", "POST", + "-F", "folder_id=$folder_id", + "-F", "module=$module", + "-F", "name=$dataset.mov", + "-F", "url=https://s3.amazonaws.com/i.asdf.us/cortex/lens/data/$folder_id/$dataset.mov", + "-F", "dataset=$dataset", + "-F", "activity=splice", + "-F", "generated=false", + "-F", "processed=true", + "-F", "datatype=video", + $endpoint + ] + print(join("\n", @$cmd)); system("curl", "-X", "POST", |
