Add command to publish traces

commands/project/pub_traces.pl

@@ -0,0 +1,20 @@
+#! /usr/bin/env perl
+
+use v5.10.1;
+use strict;
+use warnings;
+
+use lib "../../";
+
+use ACU::API::Base;
+use ACU::API::Projects;
+
+
+if ($#ARGV == 1)
+{
+    API::Projects::add_traces($ARGV[0], $ARGV[1]);
+}
+else
+{
+    say "$0 <project_id> <traces_id>";
+}