view release on metacpan or search on metacpan
lib/Acme/CPANAuthors/InMostCPANAuthors.pm view on Meta::CPAN
| SIMONW | 6 | British, CPANTS::FiveOrMore, DualLife, European, GitHub, POE |
| SYP | 6 | Brazilian, CPAN::TopDepended, CPAN::TopDepended::ByOthers, European, GitHub, Russian |
| TINITA | 6 | CPAN::TopDepended, CPAN::TopDepended::ByOthers, CPANTS::FiveOrMore, European, German, GitHub |
| TYPESTER | 6 | AnyEvent, CPANTS::FiveOrMore, CodeRepos, GitHub, Japanese, POE |
Note: Some lists are excluded (see this distribution's C<devscript/update-data>
for more details).
=head1 HOMEPAGE
Please visit the project's homepage at L<https://metacpan.org/release/Acme-CPANAuthors-InMostCPANAuthors>.
view release on metacpan or search on metacpan
lib/Acme/CPANAuthors/India.pm view on Meta::CPAN
=head1 SEE ALSO
* [Acme::CPANAuthors::Register]
=for :stopwords cpan testmatrix url annocpan anno bugtracker rt cpants kwalitee diff irc mailto metadata placeholders metacpan
=head1 SUPPORT
=head2 Bugs / Feature Requests
view release on metacpan or search on metacpan
"Dist::Zilla::Plugin::CheckSelfDependency" : {
"finder" : [
":InstallModules"
]
},
"Dist::Zilla::Role::ModuleMetadata" : {
"Module::Metadata" : "1.000033",
"version" : "0.006"
}
},
"name" : "@Author::PERLANCAR/CheckSelfDependency",
"version" : "0.011"
view release on metacpan or search on metacpan
lib/Acme/CPANAuthors/Israeli.pm view on Meta::CPAN
=head1 SEE ALSO
L<Acme::CPANAuthors> - the driver for this class.
=for :stopwords cpan testmatrix url bugtracker rt cpants kwalitee diff irc mailto metadata placeholders metacpan
=head1 SUPPORT
=head2 Websites
view release on metacpan or search on metacpan
MANIFEST This list of files
README
t/00_load.t
t/99_pod.t
t/99_podcoverage.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/expand_author_list.pm view on Meta::CPAN
my $url = $json->{gravatar_url};
$url =~ s/s=\K130/80/g;
return $url;
}
sub extract_data {
state $result_cache = {};
my ( $category, $source_file ) = @_;
return $result_cache->{$category} if exists $result_cache->{$category};
my $author_data = Parse::CPAN::Whois->new( mirror_whois('00whois.xml') );
my $author_hash = {};
my @authors;
for my $id ( path($source_file)->lines_raw( { chomp => 1 } ) ) {
dolog("$category / $id");
my $name = $author_data->author($id)->name;
$author_hash->{$id} = $name;
push @authors,
{
id => $id,
name => $name,
inc/expand_author_list.pm view on Meta::CPAN
my $category = $config{category};
my $authors = '';
my $avatar_urls = '';
for my $author ( @{ $config{data} } ) {
$authors .= " $author->{id} => '$author->{name}',\n";
$avatar_urls .= " $author->{id} => '$author->{avatar}',\n";
}
my @display_authors = map { $config{data}->[ rng->irand() % scalar @{ $config{data} } ] } 1;
return <<"EOF";
# Code inserted by inc/expand_author_list#authors_to_code
# by $plugin_name $plugin_version
## no critic (ValuesAndExpressions::RestrictLongStrings)
inc/expand_author_list.pm view on Meta::CPAN
my $plugin = $config{plugin};
my $plugin_name = $config{plugin_name} // ref $config{plugin};
my $plugin_version = $config{plugin_version} // $plugin_name->VERSION;
my @lines;
for my $author ( @{ $config{data} } ) {
my $name = encode_entities( $author->{name} );
my $title = "$author->{id} ($name), $author->{dists} distribution" . ( $author->{dists} != 1 ? 's' : '' );
push @lines,
qq{<a href="http://metacpan.org/author/$author->{id}">}
. q{<span>}
inc/expand_author_list.pm view on Meta::CPAN
my (%config) = ref $_[0] ? %{ $_[0] } : @_;
my $plugin = $config{plugin};
my $plugin_name = $config{plugin_name} // ref $config{plugin};
my $plugin_version = $config{plugin_version} // $plugin_name->VERSION;
my @items = @{ $config{'data'} };
my @authors = map { $items[ rng->irand() % scalar @items ] } 1 .. 3;
return ( <<"EOF" =~ s/^(\S)/ $1/msgr );
use Acme::CPANAuthors;
use Acme::CPANAuthors::$config{category};
view release on metacpan or search on metacpan
inc/Module/Install/Metadata.pm view on Meta::CPAN
#line 1
package Module::Install::Metadata;
use strict 'vars';
use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE};
inc/Module/Install/Metadata.pm view on Meta::CPAN
sub read {
my $self = shift;
$self->include_deps( 'YAML::Tiny', 0 );
require YAML::Tiny;
my $data = YAML::Tiny::LoadFile('META.yml');
# Call methods explicitly in case user has already set some values.
while ( my ( $key, $value ) = each %$data ) {
next unless $self->can($key);
if ( ref $value eq 'HASH' ) {
while ( my ( $module, $version ) = each %$value ) {
$self->can($key)->($self, $module => $version );
}
inc/Module/Install/Metadata.pm view on Meta::CPAN
$v = $v + 0;
}
return $v;
}
sub add_metadata {
my $self = shift;
my %hash = @_;
for my $key (keys %hash) {
warn "add_metadata: $key is not prefixed with 'x_'.\n" .
"Use appopriate function to add non-private metadata.\n" unless $key =~ /^x_/;
$self->{values}->{$key} = $hash{$key};
}
}
inc/Module/Install/Metadata.pm view on Meta::CPAN
# We need YAML::Tiny to write the MYMETA.yml file
unless ( eval { require YAML::Tiny; 1; } ) {
return 1;
}
# Generate the data
my $meta = $self->_write_mymeta_data or return 1;
# Save as the MYMETA.yml file
print "Writing MYMETA.yml\n";
YAML::Tiny::DumpFile('MYMETA.yml', $meta);
}
inc/Module/Install/Metadata.pm view on Meta::CPAN
# 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;
# If there's no existing META.yml there is nothing we can do
return undef unless -f 'META.yml';
view release on metacpan or search on metacpan
lib/Acme/CPANAuthors/Nonhuman.pm view on Meta::CPAN
our $VERSION = '0.026';
use utf8;
# this data was generated at build time via __DATA__ section
# and Dist::Zilla::Plugin::MungeFile::WithDataSection 0.009
my %authors = (
ETHER => 'Karen Etheridge',
VOJ => 'Jakob Voß',
IVANWILLS => 'Ivan Wills',
lib/Acme/CPANAuthors/Nonhuman.pm view on Meta::CPAN
ORCHEW => 'https://secure.gravatar.com/avatar/4a66363f9a279ce1a2914752a3b02b17?s=80&d=identicon',
PERLPIE => 'https://secure.gravatar.com/avatar/cb9aa3bf6f061556cf82b103c62ebbfe?s=80&d=identicon',
SZARATE => 'https://secure.gravatar.com/avatar/236a2d411a6c0ed05f9cc9e766b3df4e?s=80&d=identicon',
ZHDA => 'https://secure.gravatar.com/avatar/404694046d02a4714216c13dce0761f4?s=80&d=identicon',
);
# end data generated at build time
sub authors { wantarray ? %authors : \%authors }
sub category { 'Nonhuman' }
lib/Acme/CPANAuthors/Nonhuman.pm view on Meta::CPAN
=begin html
<div style="text-align:center;padding:0px!important;overflow-y:hidden;
margin-left: auto; margin-right: auto; max-width: 50%">
<!-- this data was generated at build time via __DATA__ section and Dist::Zilla::Plugin::MungeFile::WithDataSection 0.009 -->
<a href="http://metacpan.org/author/ETHER"><span><img style="margin: 0 5px 5px 0;" width="80" height="80" src="https://secure.gravatar.com/avatar/bdc5cd06679e732e262f6c1b450a0237?s=80&d=identicon" alt="ETHER" title="ETHER (Karen Etheridge), 219 distr...
--><a href="http://metacpan.org/author/VOJ"><span><img style="margin: 0 5px 5px 0;" width="80" height="80" src="http://www.gravatar.com/avatar/9827ddb7c8cb132375cf55bf7e624250?s=80&d=http%3A%2F%2Fwww.gravatar.com%2Favatar%2Fdcad11c6680a6c59cc31d2bf1b...
--><a href="http://metacpan.org/author/IVANWILLS"><span><img style="margin: 0 5px 5px 0;" width="80" height="80" src="https://secure.gravatar.com/avatar/c668586858d59a94f3eb761903175f27?s=80&d=identicon" alt="IVANWILLS" title="IVANWILLS (Ivan Wills),...
--><a href="http://metacpan.org/author/ZDM"><span><img style="margin: 0 5px 5px 0;" width="80" height="80" src="https://secure.gravatar.com/avatar/f99956427457624457d0b626f492747d.png" alt="ZDM" title="ZDM (Dmytro Zagashev), 47 distributions" /></spa...
--><a href="http://metacpan.org/author/MITHALDU"><span><img style="margin: 0 5px 5px 0;" width="80" height="80" src="https://secure.gravatar.com/avatar/d9c28af939032ab0c30fd7be8fdc1040?s=80&d=identicon" alt="MITHALDU" title="MITHALDU (Christian Walde...
lib/Acme/CPANAuthors/Nonhuman.pm view on Meta::CPAN
I wrote this module initially as a reaction to a previous L<Acme::CPANAuthors>
distribution that inappropriately highlighted a particular demographic (it has
now since been deleted). Then, I realized that so much of the content I
wanted to include in this module could be programmatically generated, so I
continued on as an exercise in templating code at build time using raw data in
the C<__DATA__> section. That support code has since been split off into its
own distribution, L<Dist::Zilla::Plugin::MungeFile::WithDataSection>.
This module has continued to evolve, as rough edges in bits of the toolchain
are polished. These improvements include:
view release on metacpan or search on metacpan
MANIFEST This list of files
README
t/00_load.t
t/99_pod.t
t/99_podcoverage.t
META.yml Module meta-data (added by MakeMaker)
view release on metacpan or search on metacpan
README
lib/Acme/CPANAuthors/Portuguese.pm
t/00-load.t
t/pod-coverage.t
t/pod.t
META.yml Module meta-data (added by MakeMaker)
view release on metacpan or search on metacpan
t/000_basic.t
t/950_pod.t
t/960_pod_coverage.t
Changes
README
META.yml Module meta-data (added by MakeMaker)
view release on metacpan or search on metacpan
script/cpan-author.pl view on Meta::CPAN
sub get {
my $self = shift;
unlink FILE if -e FILE && time - [stat(FILE)]->[9] > EXP;
if (my $data = eval { local $/; open my $fh, '<', FILE or die $!; <$fh> }) {
warn 'cache';
$_->request(HTTP::Request->new('GET', shift)), return $_ for HTTP::Response->new(200, 'OK', undef, $data);
}
for ($self->SUPER::get(@_)) {
open my $fh, '>', FILE or die $!;
print $fh $_->content;
script/cpan-author.pl view on Meta::CPAN
=head1 DESCRIPTION
You can use this to find Russian CPAN authors or Russian PAUSE id accounts.
This script fetches data from L<http://pause.perl.org/pause/query?ACTION=who_is>.
See source code :)
=head1 AUTHOR
view release on metacpan or search on metacpan
inc/Module/Install/Metadata.pm view on Meta::CPAN
#line 1
package Module::Install::Metadata;
use strict 'vars';
use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE};
inc/Module/Install/Metadata.pm view on Meta::CPAN
sub read {
my $self = shift;
$self->include_deps( 'YAML::Tiny', 0 );
require YAML::Tiny;
my $data = YAML::Tiny::LoadFile('META.yml');
# Call methods explicitly in case user has already set some values.
while ( my ( $key, $value ) = each %$data ) {
next unless $self->can($key);
if ( ref $value eq 'HASH' ) {
while ( my ( $module, $version ) = each %$value ) {
$self->can($key)->($self, $module => $version );
}
inc/Module/Install/Metadata.pm view on Meta::CPAN
$v = $v + 0;
}
return $v;
}
sub add_metadata {
my $self = shift;
my %hash = @_;
for my $key (keys %hash) {
warn "add_metadata: $key is not prefixed with 'x_'.\n" .
"Use appopriate function to add non-private metadata.\n" unless $key =~ /^x_/;
$self->{values}->{$key} = $hash{$key};
}
}
inc/Module/Install/Metadata.pm view on Meta::CPAN
# We need YAML::Tiny to write the MYMETA.yml file
unless ( eval { require YAML::Tiny; 1; } ) {
return 1;
}
# Generate the data
my $meta = $self->_write_mymeta_data or return 1;
# Save as the MYMETA.yml file
print "Writing MYMETA.yml\n";
YAML::Tiny::DumpFile('MYMETA.yml', $meta);
}
inc/Module/Install/Metadata.pm view on Meta::CPAN
# 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;
# If there's no existing META.yml there is nothing we can do
return undef unless -f 'META.yml';
view release on metacpan or search on metacpan
README
lib/Acme/CPANAuthors/Spanish.pm
t/00-load.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
MANIFEST This list of files
README
t/00_load.t
t/99_pod.t
t/99_podcoverage.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
[PruneCruft]
[GatherDir]
exclude_filename = weaver.ini
exclude_match = Acme-CPANAuthors-Turkish-[0-9]
; metadata
[MetaYAML]
[MetaJSON]
[Keywords]
keywords = acme cpan cpanauthors
view release on metacpan or search on metacpan
lib/Acme/CPANAuthors/You/re_using.pm view on Meta::CPAN
use strict;
use warnings;
use File::Find ();
use Module::Metadata;
use Acme::CPANAuthors::Utils;
=head1 NAME
lib/Acme/CPANAuthors/You/re_using.pm view on Meta::CPAN
File::Find::find({
wanted => sub {
return unless /\.pm$/;
my $mod = do {
local $@;
eval { Module::Metadata->new_from_file($_) }
};
return unless $mod;
@modules{grep $_, $mod->packages_inside} = ();
},
follow => 0,
lib/Acme/CPANAuthors/You/re_using.pm view on Meta::CPAN
L<File::Find> (core since perl 5)
L<Acme::CPANAuthors> 0.16.
L<Module::Metadata> 1.000_017.
=head1 SEE ALSO
All others C<Acme::CPANAuthors::*> modules.
view release on metacpan or search on metacpan
lib/Acme/CPANAuthors/CPAN/Streaks/DailyDistributions/AllTime.pm view on Meta::CPAN
=head1 SEE ALSO
L<Acme::CPANAuthors>
CPAN Regulars Boards, L<http://cpan.io/board/once-a/>, which as of this writing,
has some input data missing and thus produces some incorrect results.
=head1 AUTHOR
perlancar <perlancar@cpan.org>
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/BKB/FindDependencies.pm view on Meta::CPAN
package Acme::CPANLists::Import::BKB::FindDependencies;
our $DATE = '2017-03-27'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [https://www.lemoda.net/perl/perl-dependencies/index.html] (retrieved on 2017-03-27). Visit the URL for the full contents.",entries=>[{module=>"Devel::...
1;
# ABSTRACT: Modules for finding Perl dependencies (2017)
__END__
lib/Acme/CPANLists/Import/BKB/FindDependencies.pm view on Meta::CPAN
=item * L<Module::ExtractUse>
=item * L<Module::Info>
=item * L<Module::Metadata>
=item * L<Module::ScanDeps>
=item * L<Module::Used>
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/NEILB/ModulePath.pm view on Meta::CPAN
package Acme::CPANLists::Import::NEILB::ModulePath;
our $DATE = '2016-02-21'; # DATE
our $VERSION = '0.04'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in the article [http://neilb.org/reviews/module-path.html]. For the full article, visit the URL.",entries=>[{module=>"App::moduleswhere"},{module=>"App::w...
1;
# ABSTRACT: Getting a module's path (2012)
__END__
lib/Acme/CPANLists/Import/NEILB/ModulePath.pm view on Meta::CPAN
=item * L<Module::Locate>
=item * L<Module::Mapper>
=item * L<Module::Metadata>
=item * L<Module::Path>
=item * L<Module::Util>
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/PERLANCAR/Advent/2014_12_03.pm view on Meta::CPAN
package Acme::CPANLists::Import::PERLANCAR::Advent::2014_12_03;
our $DATE = '2016-11-07'; # DATE
our $VERSION = '0.001'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in [http://blogs.perl.org/users/perlancar/2014/12/day-3-diff-ing-your-database-structure-dbixdiffstruct.html] (retrieved on 2016-11-07). Visit the URL for...
1;
# ABSTRACT: Modules mentioned in PERLANCAR's 2014 advent calendar article series (day 03)
__END__
lib/Acme/CPANLists/Import/PERLANCAR/Advent/2014_12_03.pm view on Meta::CPAN
This document describes version 0.001 of Acme::CPANLists::Import::PERLANCAR::Advent::2014_12_03 (from Perl distribution Acme-CPANLists-Import-PERLANCAR-Advent-2014), released on 2016-11-07.
=head1 DESCRIPTION
This module is generated by extracting module names mentioned in L<http://blogs.perl.org/users/perlancar/2014/12/day-3-diff-ing-your-database-structure-dbixdiffstruct.html> (retrieved on 2016-11-07). Visit the URL for the full contents.
=head1 MODULE LISTS
=head2 Modules mentioned in PERLANCAR's 2014 advent calendar article series (day 03)
This list is generated by extracting module names mentioned in [http://blogs.perl.org/users/perlancar/2014/12/day-3-diff-ing-your-database-structure-dbixdiffstruct.html] (retrieved on 2016-11-07). Visit the URL for the full contents.
=over
=item * L<DBIx::Compare>
view release on metacpan or search on metacpan
[@Author::PERLANCAR]
:version=0.53
[PruneFiles / PruneFiles additional]
filename = devscripts
filename = devdata
[Prereqs]
[Prereqs / DevelopRecommends]
;!lint_prereqs assume-used "spec"
view release on metacpan or search on metacpan
[@Author::PERLANCAR]
:version=0.53
[PruneFiles / PruneFiles additional]
filename = devscripts
filename = devdata
[Prereqs]
[Prereqs / DevelopRecommends]
;!lint_prereqs assume-used "spec"
view release on metacpan or search on metacpan
[@Author::PERLANCAR]
:version=0.53
[PruneFiles / PruneFiles additional]
filename = devscripts
filename = devdata
[Prereqs]
[Prereqs / DevelopRecommends]
;!lint_prereqs assume-used "spec"
view release on metacpan or search on metacpan
[@Author::PERLANCAR]
:version=0.53
[PruneFiles / PruneFiles additional]
filename = devscripts
filename = devdata
[Prereqs]
[Prereqs / DevelopRecommends]
;!lint_prereqs assume-used "spec"
view release on metacpan or search on metacpan
[@Author::PERLANCAR]
:version=0.53
[PruneFiles / PruneFiles additional]
filename = devscripts
filename = devdata
[Prereqs]
[Prereqs / DevelopRecommends]
;!lint_prereqs assume-used "spec"
view release on metacpan or search on metacpan
[@Author::PERLANCAR]
:version=0.53
[PruneFiles / PruneFiles additional]
filename = devscripts
filename = devdata
[Prereqs]
[Prereqs / DevelopRecommends]
;!lint_prereqs assume-used "spec"
view release on metacpan or search on metacpan
[@Author::PERLANCAR]
:version=0.53
[PruneFiles / PruneFiles additional]
filename = devscripts
filename = devdata
[Prereqs]
[Prereqs / DevelopRecommends]
;!lint_prereqs assume-used "spec"
view release on metacpan or search on metacpan
[@Author::PERLANCAR]
:version=0.53
[PruneFiles / PruneFiles additional]
filename = devscripts
filename = devdata
[Prereqs]
[Prereqs / DevelopRecommends]
;!lint_prereqs assume-used "spec"
view release on metacpan or search on metacpan
[@Author::PERLANCAR]
:version=0.53
[PruneFiles / PruneFiles additional]
filename = devscripts
filename = devdata
[Prereqs]
[Prereqs / DevelopX_spec]
-phase=develop