view release on metacpan or search on metacpan
-
class: Dist::Zilla::Plugin::MetaTests
name: '@Author::ZOFFIX/MetaTests'
version: '5.034'
-
class: Dist::Zilla::Plugin::Test::CPAN::Meta::JSON
name: '@Author::ZOFFIX/Test::CPAN::Meta::JSON'
version: '0.004'
-
class: Dist::Zilla::Plugin::MojibakeTests
name: '@Author::ZOFFIX/MojibakeTests'
version: '0.7'
view release on metacpan or search on metacpan
t/00-load.t
t/manifest.t
t/pod-coverage.t
t/pod.t
META.yml Module YAML meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
view release on metacpan or search on metacpan
"class" : "Dist::Zilla::Plugin::MetaConfig",
"name" : "@DROLSKY/MetaConfig",
"version" : "5.037"
},
{
"class" : "Dist::Zilla::Plugin::MetaJSON",
"name" : "@DROLSKY/MetaJSON",
"version" : "5.037"
},
{
"class" : "Dist::Zilla::Plugin::RewriteVersion",
"name" : "@DROLSKY/RewriteVersion",
view release on metacpan or search on metacpan
t/pod.t
t/shuffle.t
t/sum.t
xt/boilerplate.t
META.yml Module YAML meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
view release on metacpan or search on metacpan
Makefile.PL
MANIFEST
README
t/test.t
META.yml Module meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
view release on metacpan or search on metacpan
"repository" : {
"url" : "https://thrig.me/src/Acme-EdError.git"
}
},
"version" : "9.18",
"x_serialization_backend" : "JSON::PP version 4.16"
}
view release on metacpan or search on metacpan
t/t4/ConfusedLax1.pm
t/t4/ConfusedLax2.pm
t/t4/ConfusedStrict1.pm
t/t4/ConfusedStrict2.pm
META.yml Module YAML meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
SIGNATURE Public-key signature (added by MakeMaker)
view release on metacpan or search on metacpan
t/00-load.t
t/manifest.t
t/pod-coverage.t
t/pod.t
META.yml Module YAML meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
view release on metacpan or search on metacpan
t/manifest.t
t/pod-coverage.t
t/pod.t
xt/boilerplate.t
META.yml Module YAML meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
view release on metacpan or search on metacpan
"license" : [
"http://opensource.org/licenses/artistic-license-2.0.php"
]
},
"version" : "0.04",
"x_serialization_backend" : "JSON::PP version 2.27400_02"
}
view release on metacpan or search on metacpan
"license" : [
"http://www.gnu.org/licenses/lgpl-3.0.txt"
]
},
"version" : "v2.3.6",
"x_serialization_backend" : "JSON::PP version 4.16"
}
view release on metacpan or search on metacpan
t/manifest.t
t/pod-coverage.t
t/pod.t
xt/boilerplate.t
META.yml Module YAML meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
view release on metacpan or search on metacpan
inc/Module/Install/Metadata.pm view on Meta::CPAN
}
sub write_mymeta_json {
my $self = shift;
# We need JSON to write the MYMETA.json file
unless ( eval { require JSON; 1; } ) {
return 1;
}
# Generate the data
my $meta = $self->_write_mymeta_data or return 1;
# Save as the MYMETA.yml file
print "Writing MYMETA.json\n";
Module::Install::_write(
'MYMETA.json',
JSON->new->pretty(1)->canonical->encode($meta),
);
}
sub _write_mymeta_data {
my $self = shift;
view release on metacpan or search on metacpan
"Dist::Zilla::Plugin::MakeMaker" : "0",
"Dist::Zilla::Plugin::Manifest" : "0",
"Dist::Zilla::Plugin::ManifestSkip" : "0",
"Dist::Zilla::Plugin::MetaConfig" : "0",
"Dist::Zilla::Plugin::MetaData::BuiltWith" : "1.004000",
"Dist::Zilla::Plugin::MetaJSON" : "0",
"Dist::Zilla::Plugin::MetaProvides::Package" : "1.14000001",
"Dist::Zilla::Plugin::MetaTests" : "0",
"Dist::Zilla::Plugin::MetaYAML::Minimal" : "0",
"Dist::Zilla::Plugin::MinimumPerl" : "0",
"Dist::Zilla::Plugin::PodCoverageTests" : "0",
"class" : "Dist::Zilla::Plugin::License",
"name" : "@Author::KENTNL/License",
"version" : "6.009"
},
{
"class" : "Dist::Zilla::Plugin::MetaJSON",
"name" : "@Author::KENTNL/MetaJSON",
"version" : "6.009"
},
{
"class" : "Dist::Zilla::Plugin::MetaYAML::Minimal",
"config" : {
},
"version" : "6.009"
}
},
"x_authority" : "cpan:KENTNL",
"x_serialization_backend" : "Cpanel::JSON::XS version 3.0227"
}
view release on metacpan or search on metacpan
},
"x_IRC" : "irc://irc.perl.org/#native"
},
"version" : "2.7200",
"x_generated_by_perl" : "v5.37.5",
"x_serialization_backend" : "Cpanel::JSON::XS version 4.32",
"x_spdx_expression" : "Artistic-1.0-Perl OR GPL-1.0-or-later",
"x_use_unsafe_inc" : 0
}
view release on metacpan or search on metacpan
},
"x_IRC" : "irc://irc.perl.org/#native"
},
"version" : "2.7200",
"x_generated_by_perl" : "v5.37.5",
"x_serialization_backend" : "Cpanel::JSON::XS version 4.32",
"x_spdx_expression" : "Artistic-1.0-Perl OR GPL-1.0-or-later",
"x_use_unsafe_inc" : 0
}
view release on metacpan or search on metacpan
},
"x_IRC" : "irc://irc.perl.org/#native"
},
"version" : "2.7200",
"x_generated_by_perl" : "v5.37.5",
"x_serialization_backend" : "Cpanel::JSON::XS version 4.32",
"x_spdx_expression" : "Artistic-1.0-Perl OR GPL-1.0-or-later",
"x_use_unsafe_inc" : 0
}
view release on metacpan or search on metacpan
},
"x_IRC" : "irc://irc.perl.org/#native"
},
"version" : "2.7200",
"x_generated_by_perl" : "v5.37.5",
"x_serialization_backend" : "Cpanel::JSON::XS version 4.32",
"x_spdx_expression" : "Artistic-1.0-Perl OR GPL-1.0-or-later",
"x_use_unsafe_inc" : 0
}
view release on metacpan or search on metacpan
lib/Acme/Free/API/ChuckNorris.pm view on Meta::CPAN
use strict;
our $VERSION = '1.0.1';
use HTTP::Tiny;
use JSON qw/decode_json/;
use Util::H2O::More qw/baptise d2o h2o/;
use constant {
BASEURL => "https://api.chucknorris.io/jokes",
};
view release on metacpan or search on metacpan
lib/Acme/Free/API/Geodata/GeoIP.pm view on Meta::CPAN
our $VERSION = '1.0';
use Data::Dumper;
use WWW::Mechanize;
use JSON::XS qw(decode_json);
sub new($proto, %config) {
my $class = ref($proto) || $proto;
my $self = bless \%config, $class;
lib/Acme/Free/API/Geodata/GeoIP.pm view on Meta::CPAN
$decoded = decode_json($content);
$ok = 1;
};
if(!$ok || !defined($decoded)) {
$self->_debuglog("Failed to decode response. Not a JSON document?");
$self->_debuglog(Dumper($decoded));
return;
}
#$self->_debuglog(Dumper($decoded));
view release on metacpan or search on metacpan
lib/Acme/Free/API/Stonks.pm view on Meta::CPAN
use warnings;
our $VERSION = '1.0.2';
use HTTP::Tiny;
use JSON qw/decode_json/;
use Util::H2O::More qw/baptise d2o/;
use constant {
BASEURL => "https://tradestie.com/api/v1/apps/reddit",
};
lib/Acme/Free/API/Stonks.pm view on Meta::CPAN
Instantiates object reference. No parameters are accepted.
=item C<stonks>
Object method that returns an ARRAY reference (based on the JSON returned
by this service), that's been give the additional ARRAY vmethods via
L<Util::H2O::More> such as C<< ->all >> (used in the L<SYNOPSIS> above).
=back
view release on metacpan or search on metacpan
lib/Acme/Free/API/Ye.pm view on Meta::CPAN
use warnings;
our $VERSION = '1.0.2';
use HTTP::Tiny;
use JSON qw/decode_json/;
use Util::H2O::More qw/baptise d2o/;
use constant {
BASEURL => "https://api.kanye.rest",
};
view release on metacpan or search on metacpan
lib/Acme/Free/Advice/Slip.pm view on Meta::CPAN
package Acme::Free::Advice::Slip 1.1 { # https://api.adviceslip.com/
use v5.38;
use HTTP::Tiny;
use JSON::Tiny qw[decode_json];
use parent 'Exporter';
our %EXPORT_TAGS = ( all => [ our @EXPORT_OK = qw[advice search] ] );
#
use overload '""' => sub ( $s, $u, $b ) { $s->{advice} // () };
#
sub _http ($uri) {
state $http
//= HTTP::Tiny->new( default_headers => { Accept => 'application/json' }, agent => sprintf '%s/%.2f ', __PACKAGE__, our $VERSION );
my $res = $http->get($uri); # {success} is true even when advice is not found but we'll at least know when we have valid JSON
$res->{success} ? decode_json( $res->{content} ) : ();
}
#
sub advice ( $slip_id //= () ) {
my $res = _http( 'https://api.adviceslip.com/advice' . ( $slip_id ? '/' . $slip_id : '' ) );
view release on metacpan or search on metacpan
lib/Acme/Free/Advice/Unsolicited.pm view on Meta::CPAN
package Acme::Free::Advice::Unsolicited 1.1 { # https://kk-advice.koyeb.app/api
use v5.38;
use HTTP::Tiny;
use JSON::Tiny qw[decode_json];
use parent 'Exporter';
our %EXPORT_TAGS = ( all => [ our @EXPORT_OK = qw[advice all] ] );
#
use overload '""' => sub ( $s, $u, $b ) { $s->{advice} // () };
#
sub _http ($uri) {
state $http
//= HTTP::Tiny->new( default_headers => { Accept => 'application/json' }, agent => sprintf '%s/%.2f ', __PACKAGE__, our $VERSION );
my $res = $http->get($uri); # {success} is true even when advice is not found but we'll at least know when we have valid JSON
$res->{success} ? decode_json( $res->{content} ) : ();
}
#
sub advice ( $advice_id //= () ) {
my $res = _http( 'https://kk-advice.koyeb.app/api/advice' . ( $advice_id ? '/' . $advice_id : '' ) );
view release on metacpan or search on metacpan
script/advice.pl view on Meta::CPAN
#
my $raw = 0;
my $flavor;
sub _echo ($advice) {
$raw && eval 'require JSON::Tiny' ? JSON::Tiny::encode_json( {%$advice} ) : $advice;
}
GetOptions(
\my %h, 'language=s',
'help' => sub { pod2usage( -exitval => 1 ) },
'flavors!' => sub { exit !say 'Supported advice flavors: ' . join ', ', Acme::Free::Advice::flavors() },
script/advice.pl view on Meta::CPAN
advice -unsolicited # generate unsolicited advice from Kevin Kelly
advice -help # get help
=head1 OPTIONS
-json Echo raw JSON encoded data
-flavors List supported advice flavors
-slip Generate an advice with Acme::Free::Advice::Slip
-unsolicited Generate an advice with Acme::Free::Advice::Unsolicited
-help Display this help message
view release on metacpan or search on metacpan
lib/Acme/Free/Dog/API.pm view on Meta::CPAN
use warnings;
our $VERSION = '0.9.10';
use HTTP::Tiny;
use JSON qw/decode_json/;
use Util::H2O::More qw/baptise ddd HTTPTiny2h2o h2o/;
use constant {
BASEURL => "https://dog.ceo/api",
};
lib/Acme/Free/Dog/API.pm view on Meta::CPAN
clients in a clean and idiomatic way. These kind of APIs tracked at
L<https://www.freepublicapis.com/> are really nice for fun and practice
because they don't require dealing with API keys in the vast majority of cases.
This module is the first one written using L<Util::H2O::More>'s C<HTTPTiny2h2o>
method that looks for C<JSON> in the C<content> key returned via L<HTTP::Tiny>'s
response C<HASH>.
=head1 METHODS
=over 4
view release on metacpan or search on metacpan
lib/Acme/Free/Public/APIs.pm view on Meta::CPAN
use warnings;
our $VERSION = '0.9.10';
use HTTP::Tiny;
use JSON qw/decode_json/;
use Util::H2O::More qw/baptise d2o HTTPTiny2h2o/;
use constant {
BASEURL => "https://www.freepublicapis.com/api/",
};
lib/Acme/Free/Public/APIs.pm view on Meta::CPAN
clients in a clean and idiomatic way. These kind of APIs tracked at
L<https://www.freepublicapis.com/> are really nice for fun and practice
because they don't require dealing with API keys in the vast majority of cases.
This module is the first one written using L<Util::H2O::More>'s C<HTTPTiny2h2o>
method that looks for C<JSON> in the C<content> key returned via L<HTTP::Tiny>'s
response C<HASH>.
=head1 METHODS
=over 4
lib/Acme/Free/Public/APIs.pm view on Meta::CPAN
321 100 Church Calendar API
191 100 IP Geolocation & Currency Converter
129 100 IP Geolocation API
92 99 French Address API
94 95 Carbon Intensity API
90 95 JSONPlaceholder
88 95 Stadt Land Fluss
80 95 Dungeons and Dragons
77 95 Digimon API
75 95 Rick and Morty API
72 95 kanye.rest
view release on metacpan or search on metacpan
"license" : [
"http://www.perlfoundation.org/artistic_license_2_0"
]
},
"version" : "0.06",
"x_serialization_backend" : "JSON::PP version 2.97001"
}
view release on metacpan or search on metacpan
eg/ghost_nobody.pl
eg/ghost_simple.pl
eg/prefork_acme.pl
eg/prefork_ioloop.pl
META.yml Module YAML meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
view release on metacpan or search on metacpan
[CriticTests]
[EOLTests]
[HasVersionTests]
[KwaliteeTests]
[MetaTests]
[Test::CPAN::Meta::JSON]
[MinimumVersionTests]
[NoTabsTests]
[PodCoverageTests]
[PodSyntaxTests]
[PortabilityTests]