App-BambooCli

 view release on metacpan or  search on metacpan

bin/bamboo  view on Meta::CPAN

# Created on: 2019-05-15 09:09:16
# Create by:  Ivan Wills
# $Id$
# $Revision$, $HeadURL$, $Date$
# $Revision$, $Source$, $Date$

use strict;
use warnings;
use version;
use Getopt::Alt;
use Data::Dumper qw/Dumper/;
use English qw/ -no_match_vars /;
use FindBin qw/$Bin/;
use Path::Tiny;
use App::BambooCli;

our $VERSION = version->new('0.0.1');
my ($name)   = $PROGRAM_NAME =~ m{^.*/(.*?)$}mxs;

my %option = (
    out     => undef,

lib/App/BambooCli.pm  view on Meta::CPAN

# $Revision$, $Source$, $Date$

use Moo;
use warnings;
use version;
use Carp;
use Scalar::Util;
use List::Util;
#use List::MoreUtils;
use Getopt::Alt;
use Data::Dumper qw/Dumper/;
use English qw/ -no_match_vars /;
use Path::Tiny;
use YAML::Syck qw/ LoadFile DumpFile /;
use App::BambooCli::Config;

our $VERSION = version->new('0.0.1');

has config => (
    is      => 'rw',
);

lib/App/BambooCli/Command.pm  view on Meta::CPAN

# $Revision$, $Source$, $Date$

use Moo;
use warnings;
use version;
use Carp;
use Scalar::Util;
use List::Util;
#use List::MoreUtils;
use Getopt::Alt;
use Data::Dumper qw/Dumper/;
use English qw/ -no_match_vars /;

our $VERSION = version->new('0.0.1');

has [qw/ defaults options /] => (
    is => 'rw',
);

has bamboo => (
    is       => 'rw',

lib/App/BambooCli/Command/Plans.pm  view on Meta::CPAN

# $Revision$, $HeadURL$, $Date$
# $Revision$, $Source$, $Date$

use Moo;
use warnings;
use version;
use Carp;
use Scalar::Util;
use List::Util;
#use List::MoreUtils;
use Data::Dumper qw/Dumper/;
use English qw/ -no_match_vars /;

extends 'App::BambooCli::Command';

our $VERSION = version->new('0.0.1');

our $NAME    = 'plans';
our $OPTIONS = [
    'key|k=s',
    'force|f!',

lib/App/BambooCli/Command/Project.pm  view on Meta::CPAN

# $Revision$, $HeadURL$, $Date$
# $Revision$, $Source$, $Date$

use Moo;
use warnings;
use version;
use Carp;
use Scalar::Util;
use List::Util;
#use List::MoreUtils;
use Data::Dumper qw/Dumper/;
use English qw/ -no_match_vars /;

extends 'App::BambooCli::Command';

our $VERSION = version->new('0.0.1');

our $NAME    = 'plans';
our $OPTIONS = [
    'key|k=s',
    'force|f!',

lib/App/BambooCli/Command/Projects.pm  view on Meta::CPAN

# $Revision$, $HeadURL$, $Date$
# $Revision$, $Source$, $Date$

use Moo;
use warnings;
use version;
use Carp;
use Scalar::Util;
use List::Util;
#use List::MoreUtils;
use Data::Dumper qw/Dumper/;
use English qw/ -no_match_vars /;

extends 'App::BambooCli::Command';

our $VERSION = version->new('0.0.1');

our $NAME    = 'projects';
our $OPTIONS = [
    'force|f!',
    'verbose|v+',

lib/App/BambooCli/Config.pm  view on Meta::CPAN

# $Revision$, $HeadURL$, $Date$
# $Revision$, $Source$, $Date$

use Moo;
use warnings;
use version;
use Carp;
use Scalar::Util;
use List::Util;
#use List::MoreUtils;
use Data::Dumper qw/Dumper/;
use English qw/ -no_match_vars /;
use Net::Bamboo;

our $VERSION = version->new('0.0.1');

has name => (
    is      => 'rw',
    default => sub {
        return -f '.bamboo' ? '.bamboo' : "$ENV{HOME}/.bamboo";
    },