ls qw(error_message warning_message);
use Moose::Role;
use WWW::Trello::Lite;
use JSON::XS qw(encode_json decode_json);
use Path::Class;
has 'trello' => (
is => 'rw',
isa
$in =~ s/\s+//;
unless ( $in =~ /^n/i ) {
my $f = file($file);
my $old = JSON::XS->new->utf8->relaxed->decode(
scalar $f->slurp( iomode => '<:encoding(UTF-8)' ) );
llo}{$k} = $v;
}
$f->spew(
iomode => '>:encoding(UTF-8)',
JSON::XS->new->utf8->pretty->encode($old)
);
}
}
sub _trello_fetch_card {
my ( $self,