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 "; +}