From 580564e358241d22decfe697d9baa21334cd7886 Mon Sep 17 00:00:00 2001 From: Mercier Pierre-Olivier Date: Sat, 14 Sep 2013 09:35:56 +0200 Subject: [PATCH] Add command to publish traces --- commands/project/pub_traces.pl | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 commands/project/pub_traces.pl diff --git a/commands/project/pub_traces.pl b/commands/project/pub_traces.pl new file mode 100644 index 0000000..0268b33 --- /dev/null +++ b/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 "; +}