C<get_valid_remote_name>
=begin MetaPOD::JSON v1.1.0
{
"namespace":"Dist::Zilla::Role::Git::RemoteName",
"interface":"role"
}
=end MetaPOD::JSON
=head1 AUTHOR
Kent Fredric <kentnl@cpan.
date>
Provides a L</remote_update> method which updates a L</remote> in L</git>
=begin MetaPOD::JSON v1.1.0
{
"namespace":"Dist::Zilla::Plugin::Git::Remote::Update",
"interface":"class",
:Role::Git::RemoteName",
"Dist::Zilla::Role::Git::Remote::Update"
]
}
=end MetaPOD::JSON
=head1 AUTHOR
Kent Fredric <kentnl@cpan.org>
=head1 COPYRIGHT AND LICENSE
This software is co
a::Role::Plugin>
=back
=begin MetaPOD::JSON v1.1.0
{
"namespace":"Dist::Zilla::Role::Git::LocalRepository",
"interface":"role"
}
=end MetaPOD::JSON
=head1 AUTHOR
Kent Fredric <kentnl@cp
log_fatal>
=head2 C<git>
=begin MetaPOD::JSON v1.1.0
{
"namespace":"Dist::Zilla::Role::Git::RemoteNames",
"interface":"role"
}
=end MetaPOD::JSON
=head1 AUTHOR
Kent Fredric <kentnl@cpan
= cwd();
chdir '/tmp/cpan-fixes';
cpanm(@params);
chdir $cwd;
}
sub parse_meta_json {
$_[0] ||= 'META.json';
require CPAN::Meta;
return CPAN::Meta->load_file( $_[0] );
}
sub capture_stdo
ixes;
$caller_stash->{cpanm_fix} = *cpanm_fix;
$caller_stash->{parse_meta_json} = *parse_meta_json;
$caller_stash->{capture_stdout} = *capture_stdout;
$caller_stash->{deploy_st
t;
{
$WebService::Pocket::VERSION = '0.003';
}
use Data::Dumper;
use Moose;
use HTTP::Tiny;
use JSON;
use Try::Tiny;
use WebService::Pocket::Item;
# ABSTRACT: Client for the Pocket api (http://getp
=> 'Str' );
has ua => ( is => 'ro', default => sub { HTTP::Tiny->new } );
has json => ( is => 'ro', default => sub { JSON->new->canonical } );
has items => ( is => 'ro', default => sub { {} } );
has
ms = {};
$params->{$_} = $items->[$_] for ( 0 .. @$items - 1 );
$params = { new => $self->json->encode( $params ) };
$self->_send( $params );
# Get the new items
my $all_items =
=head2 C<remote_branch>
=begin MetaPOD::JSON v1.1.0
{
"namespace":"Dist::Zilla::Role::Git::Remote::Check",
"interface":"role"
}
=end MetaPOD::JSON
=head1 AUTHOR
Kent Fredric <kentnl@cpa
local_branches>
=begin MetaPOD::JSON v1.1.0
{
"namespace":"Dist::Zilla::Role::Git::LocalRepository::LocalBranches",
"interface":"role"
}
=end MetaPOD::JSON
=head1 AUTHOR
Kent Fredric <ke
> and L</remote_branch> and
asserts L</remote_branch> is not ahead of L</branch>
=begin MetaPOD::JSON v1.1.0
{
"namespace":"Dist::Zilla::Plugin::Git::Remote::Check::BeforeBuild",
"interface"
le::Git::Remote::Check",
"Dist::Zilla::Role::Git::Remote::Update"
]
}
=end MetaPOD::JSON
=head1 AUTHOR
Kent Fredric <kentnl@cpan.org>
=head1 COPYRIGHT AND LICENSE
This software is co
>
=back
=head2 HTTP
Web stuff.
=over
=item *
L<HTTP::Tiny>
=back
=head2 JSON
JSON stuff.
=over
=item *
L<JSON::Tiny>
=back
=head2 YAML
YAML stuff.
=over
=item *
L<YAML::Tiny>
=back
is
# PODNAME: xcs2json.pl
our $VERSION = '0.05'; # VERSION
# ABSTRACT: Print a JSON representation of the input XCS file
use TBX::XCS;
use TBX::XCS::JSON qw(json_from_xcs);
print json_from_xcs(TBX::XC
S->new(file => $ARGV[0]));
__END__
=pod
=head1 NAME
xcs2json.pl - Print a JSON representation of the input XCS file
=head1 VERSION
version 0.05
=head1 AUTHOR
Nathan Glenn <garfieldnate@gmail.c
ased on Algorithm::ConsistentHash::CHash
use Algorithm::ConsistentHash::CHash;
use JSON::XS qw(encode_json decode_json);
with 'ShardedKV::Continuum';
has '_orig_continuum_spec' => (
is => 'ro',
);
lose the logger!") if $logger;
encode_json( $self->_orig_continuum_spec )
}
sub deserialize {
my $class = shift;
return $class->new(from => decode_json( $_[1] ));
}
sub clone {
my $self = s
e warnings;
use XML::Twig;
use feature 'say';
use JSON;
use Carp;
#carp from calling package, not from here
our @CARP_NOT = qw(TBX::XCS TBX::XCS::JSON);
use Data::Dumper;
our $VERSION = '0.05'; # VERS
current C<HEAD>
=begin MetaPOD::JSON v1.1.0
{
"namespace":"Dist::Zilla::Role::Git::LocalRepository::CurrentBranch",
"interface":"role"
}
=end MetaPOD::JSON
=head1 AUTHOR
Kent Fredric <ke
=head2 C<remote_name>
=begin MetaPOD::JSON v1.1.0
{
"namespace":"Dist::Zilla::Role::Git::Remote::Update",
"interface":"role"
}
=end MetaPOD::JSON
=head1 AUTHOR
Kent Fredric <kentnl@cpa
=head2 C<remote_name>
=begin MetaPOD::JSON v1.1.0
{
"namespace":"Dist::Zilla::Role::Git::Remote::Branch",
"interface":"role"
}
=end MetaPOD::JSON
=head1 AUTHOR
Kent Fredric <kentnl@cpa
date>
Provides a L</remote_update> method which updates a L</remote> in L</git>
=begin MetaPOD::JSON v1.1.0
{
"namespace":"Dist::Zilla::Plugin::Git::Remote::Update::BeforeBuild",
"interface
:Role::Git::RemoteName",
"Dist::Zilla::Role::Git::Remote::Update"
]
}
=end MetaPOD::JSON
=head1 AUTHOR
Kent Fredric <kentnl@cpan.org>
=head1 COPYRIGHT AND LICENSE
This software is co
use strict;
use warnings;
=begin MetaPOD::JSON v1.0.0
{
"namespace":"Example",
"inherits": [ "Bar", "Baz" ]
}
=end MetaPOD::JSON
ad1 VERSION
version 0.04
=head1 SYNOPSIS
my $client = Net::HTTP::Spore->new_from_spec('api.json');
# foo=bar and blah=baz will be passed on each request.
$client->enable('DefaultParam
use strict;
use warnings;
=begin MetaPOD::JSON v1.0.0
{
"namespace":"Example",
"inherits":"Bar"
}
=end MetaPOD::JSON