Result:
found more than 375 distributions - search limited to the first 2001 files matching your query
( run in 2.949 )
Acme-BadFont
view release on metacpan or search on metacpan
lib/Acme/BadFont.pm
maint/Makefile.PL.include
Makefile.PL
MANIFEST This list of files
t/basic.t
META.yml Module YAML meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
README README file (added by Distar)
Acme-Be-Modern
view release on metacpan or search on metacpan
0.04 Wed Nov 11 19:23:14 2020
Added links to GitHub repository and issue tracker.
0.03 Sat Aug 20 08:42:51 2011
Missed text of GPL in module (pod) documentation.
Need to use Perl 5.14 for building, else metadata is wrong.
0.02 Fri Aug 19 15:49:05 2011
Updated to GPL 3 configured Module::Build to generate the LICENSE file.
0.01 Wed Aug 17 15:28:15 2011
Acme-Beamerang-Logger
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
\.#
\.rej$
\..*\.sw.?$
# Avoid OS-specific files/dirs
# Mac OSX metadata
\B\.DS_Store
# Mac OSX SMB mount metadata files
\B\._
# Avoid Devel::Cover and Devel::CoverX::Covered files.
\bcover_db\b
\bcovered\b
Acme-BeyondPerl-ToSQL
view release on metacpan or search on metacpan
lib/Acme/BeyondPerl/ToSQL.pm view on Meta::CPAN
use Carp;
our $VERSION = 0.01;
our $DEBUG = 0;
my $Dbh; # database handle
my $Type; # rdbm type
END {
$Dbh->disconnect()
}
Acme-Bitfield
view release on metacpan or search on metacpan
lib/Acme/Bitfield.pm view on Meta::CPAN
use feature 'class';
no warnings 'experimental::class';
#
class Acme::Bitfield v1.1.0 {
field $size : reader : param;
field $data : reader : param = "\0" x int( ( $size + 7 ) / 8 );
ADJUST {
$self->_clean;
}
method set_data ($val) {
$data = $val;
$self->_clean; # We can't use the :writer because we must call this
}
# Internal helper to map BitTorrent bit index to vec index
# BT: bit 0 is 0x80, bit 7 is 0x01
# vec: bit 0 is 0x01, bit 7 is 0x80
sub _map ($index) { ( $index & ~7 ) | ( 7 - ( $index & 7 ) ) }
method get ($index) {
return 0 if $index < 0 || $index >= $size;
vec $data, _map($index), 1;
}
method set ($index) {
return if $index < 0 || $index >= $size;
vec( $data, _map($index), 1 ) = 1;
}
method clear ($index) {
return if $index < 0 || $index >= $size;
vec( $data, _map($index), 1 ) = 0;
}
method count () {
return unpack( '%32b*', $data );
}
method is_full () {
return $self->count == $size;
}
method is_empty () {
return $data =~ tr/\0//c ? 0 : 1;
}
method union ($other) {
my $new = __CLASS__->new( size => $size );
$new->set_data( $data|.$other->data );
return $new;
}
method intersection ($other) {
my $new = __CLASS__->new( size => $size );
$new->set_data( $data&.$other->data );
return $new;
}
method difference ($other) {
# Bits set in self but NOT in other
my $new = __CLASS__->new( size => $size );
$new->set_data( $data&.~.$other->data );
return $new;
}
method _clean () {
# internal method to automatically handle data truncation, padding, and bit masking
my $expected_len = int( ( $size + 7 ) / 8 );
if ( length($data) > $expected_len ) {
substr( $data, $expected_len ) = "";
}
elsif ( length($data) < $expected_len ) {
$data .= "\0" x ( $expected_len - length($data) );
}
my $bits_in_last_byte = $size % 8;
if ( $bits_in_last_byte != 0 && $expected_len > 0 ) {
my $mask = ( 0xFF << ( 8 - $bits_in_last_byte ) ) & 0xFF;
substr( $data, -1, 1 ) &.= chr($mask);
}
}
method fill () {
$data = "\xFF" x length($data);
$self->_clean;
}
method find_missing () {
my $index = index( unpack( 'B*', $data ), '0' );
return ( $index >= 0 && $index < $size ) ? $index : ();
}
method inverse () {
my $inverted = __CLASS__->new( size => $size );
$inverted->set_data( ~.$data );
return $inverted;
}
};
#
1;
Acme-BlahBlahBlah
view release on metacpan or search on metacpan
Makefile.PL
MANIFEST
README
t/Acme-BlahBlahBlah.t
lib/Acme/BlahBlahBlah.pm
META.yml Module meta-data (added by MakeMaker)
Acme-Blarghy-McBlarghBlargh
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 $ISCORE @ISA};
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 );
}
Acme-Bleach-Numerically
view release on metacpan or search on metacpan
lib/Acme/Bleach/Numerically.pm
t/00-Require.t
t/01-RoundTrip.t
t/helloworld.pl
t/japh.pl
META.yml Module meta-data (added by MakeMaker)
Acme-Bleach
view release on metacpan or search on metacpan
demo/demo_morse.pl
demo/demo_empty.pl
demo/demo_DWIM.pl
demo/Empty.pm
t/die.t
META.yml Module meta-data (added by MakeMaker)
Acme-BooK-Is-My-Bitch
view release on metacpan or search on metacpan
t/000-report-versions-tiny.t view on Meta::CPAN
That will help me reproduce the issue and solve your problem.
EOT
diag($v);
ok(1, "we really didn't test anything, just reporting data");
$success = 1;
# Work around another nasty module on CPAN. :/
no warnings 'once';
$Template::Test::NO_FLUSH = 1;
Acme-Boom
view release on metacpan or search on metacpan
lib/Acme/Boom.pm
Makefile.PL
MANIFEST This list of files
t/01.boom.t
META.yml Module meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
Acme-Brainfuck
view release on metacpan or search on metacpan
if (ref($stringref) ne "SCALAR") {
croak "need a reference to a scalar,";
}
$class->{position} = 0;
$class->{data} = $stringref;
$class->{end} = 0;
my $tmpfile = $class->{tmpfile} = '.tmp.' . $$;
$class->{fh} = new FileHandle "$tmpfile",
O_RDWR|O_CREAT or croak "$tmpfile: $!";
$class->{FILENO} = $class->{fh}->fileno();
sub WRITE {
my $class = shift;
my($buf,$len,$offset) = @_;
$offset = 0 if (! defined $offset);
my $data = substr($buf, $offset, $len);
my $n = length($data);
$class->print($data);
return $n;
}
sub PRINT {
my $class = shift;
${$class->{data}} .= join('', @_);
$class->{position} = length(${$class->{data}});
1;
}
sub PRINTF {
my $class = shift;
my $class = shift;
my ($buf,$len,$offset) = @_;
$offset = 0 if (! defined $offset);
my $data = ${ $class->{data} };
if ($class->{end} >= length($data)) {
return 0;
}
$buf = substr($data,$offset,$len);
$_[0] = $buf;
$class->{end} += length($buf);
return length($buf);
}
sub READLINE {
my $class = shift;
if ($class->{end} >= length(${ $class->{data} })) {
return undef;
}
my $recsep = $/;
my $rod = substr(${ $class->{data} }, $class->{end}, -1);
$rod =~ m/^(.*)$recsep{0,1}/; # use 0,1 for line sep to include possible no \n on last line
my $line = $1 . $recsep;
$class->{end} += length($line);
return $line;
}
Acme-Buckaroo
view release on metacpan or search on metacpan
Buckaroo.pm view on Meta::CPAN
#
# 1.01 Kevin J. Rice June 11th, 2002
# Submitted to CPAN.
# 1.02 Kevin J. Rice June 13th, 2002
# Fixed "bug" in POD documentation, in response to bug #741 in the
# cpan but tracking database (see http://rt.cpan.org)
#
###############################################################################
use 5.006;
use strict;
Buckaroo.pm view on Meta::CPAN
The book, by the way, is "Object Oriented Perl", by Damian Conway
and Randall L. Schwartz, published by Manning Publications Company;
ISBN: 1884777791; (August 1999).
Also thanks to Jesse who reported a bug in this documentation
and introduced me to the CPAN bug tracking database, available
to everyone to report bugs in CPAN modules or scripts. The address
for this is http://rt.cpan.org. If you know of a bug in a CPAN module,
report it there!
=head1 EXPORT
Acme-Buffy
view release on metacpan or search on metacpan
LICENSE
Makefile.PL
MANIFEST
README
t/buffy.t
META.yml Module meta-data (added by MakeMaker)
Acme-ButFirst
view release on metacpan or search on metacpan
MANIFEST
lib/Acme/ButFirst.pm
t/01_use.t
t/02_simple.t
t/03_pod.t
META.yml Module meta-data (added by MakeMaker)
Acme-CM-Get
view release on metacpan or search on metacpan
"Dist::Zilla::Plugin::CheckSelfDependency" : {
"finder" : [
":InstallModules"
]
},
"Dist::Zilla::Role::ModuleMetadata" : {
"Module::Metadata" : "1.000031",
"version" : "0.006"
}
},
"name" : "@Author::PERLANCAR/CheckSelfDependency",
"version" : "0.011"
Acme-CPAN-Testers-DevelCheckOS
view release on metacpan or search on metacpan
"Dist::Zilla::Plugin::CheckSelfDependency" : {
"finder" : [
":InstallModules"
]
},
"Dist::Zilla::Role::ModuleMetadata" : {
"Module::Metadata" : "1.000036",
"version" : "0.006"
}
},
"name" : "@Author::PERLANCAR/CheckSelfDependency",
"version" : "0.011"
Acme-CPANAuthors-Acme-CPANAuthors-Authors
view release on metacpan or search on metacpan
lib/Acme/CPANAuthors/Acme/CPANAuthors/Authors.pm view on Meta::CPAN
ZOFFIX => q[Zoffix Znet] # A::C::Canadian
);
sub _regen {
require HTTP::Tiny;
my $data = '';
my $authsec = 0;
my %authors;
die "Failed\n"
unless HTTP::Tiny->new->request(
'GET',
'http://www.cpan.org/modules/02packages.details.txt',
{data_callback => sub { # Don't scrape the whole file
my $chunk = shift;
if ($chunk =~ m[^Acme::CPANAuthors]sm) {
$authsec++;
$data .= $chunk;
}
elsif ($authsec) { # No more Authors in 02packages
while ($data
=~ m[^(?:Acme::CPANAuthors(?:::(\S+))?).+\w/\w\w/(\w+)/.+$]mg
)
{ $authors{$2} //= [];
push @{$authors{$2}}, $1;
}
Acme-CPANAuthors-AnyEvent
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';
Acme-CPANAuthors-Australian
view release on metacpan or search on metacpan
<http://purl.org/NET/cpan-uri/dist/Acme-CPANAuthors-Australian/project>
a doap:Project;
dc:contributor <http://purl.org/NET/cpan-uri/person/tobyink>;
doap-deps:runtime-requirement [ doap-deps:on "Acme::CPANAuthors"^^doap-deps:CpanId ];
doap:bug-database <http://rt.cpan.org/Dist/Display.html?Queue=Acme-CPANAuthors-Australian>;
doap:created "2013-07-01"^^xsd:date;
doap:developer <http://purl.org/NET/cpan-uri/person/tobyink>;
doap:download-page <https://metacpan.org/release/Acme-CPANAuthors-Australian>;
doap:homepage <https://metacpan.org/release/Acme-CPANAuthors-Australian>;
doap:license <http://dev.perl.org/licenses/>;
Acme-CPANAuthors-BackPAN-OneHundred
view release on metacpan or search on metacpan
examples/check100.pl view on Meta::CPAN
my $mech = WWW::Mechanize->new();
my $source = 'http://stats.cpantesters.org/stats/backpan100.csv';
my $target = basename($source);
$mech->mirror($source,$target);
my $file = 'data/backpan100.csv';
my $diff = diff $file, $target;
print $diff . "\n";
#unlink $target;
Acme-CPANAuthors-Belarusian
view release on metacpan or search on metacpan
Makefile.PL
MANIFEST
MANIFEST.SKIP
t/00-load.t
lib/Acme/CPANAuthors/Belarusian.pm
META.yml Module YAML meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
Acme-CPANAuthors-Booking
view release on metacpan or search on metacpan
MANIFEST
README
t/000_basic.t
t/950_pod.t
t/960_pod_coverage.t
META.yml Module YAML meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
Acme-CPANAuthors-Brazilian
view release on metacpan or search on metacpan
MANIFEST This list of files
README.md
t/00_load.t
xt/99_pod.t
xt/99_podcoverage.t
META.yml Module meta-data (added by MakeMaker)
META.json Module JSON meta-data (added by MakeMaker)
Acme-CPANAuthors-CPAN-MostScripts
view release on metacpan or search on metacpan
"Dist::Zilla::Plugin::CheckSelfDependency" : {
"finder" : [
":InstallModules"
]
},
"Dist::Zilla::Role::ModuleMetadata" : {
"Module::Metadata" : "1.000037",
"version" : "0.006"
}
},
"name" : "@Author::PERLANCAR/CheckSelfDependency",
"version" : "0.011"
"$Dist::Zilla::Role::MetaProvider::Provider::VERSION" : "2.002004",
"inherit_missing" : 1,
"inherit_version" : 1,
"meta_noindex" : 1
},
"Dist::Zilla::Role::ModuleMetadata" : {
"Module::Metadata" : "1.000037",
"version" : "0.006"
}
},
"name" : "@Author::PERLANCAR/MetaProvides::Package",
"version" : "2.004003"
Acme-CPANAuthors-CPAN-OneHundred
view release on metacpan or search on metacpan
examples/check100.pl view on Meta::CPAN
my $mech = WWW::Mechanize->new();
my $source = 'http://stats.cpantesters.org/stats/cpan100.csv';
my $target = basename($source);
$mech->mirror($source,$target);
my $file = 'data/cpan100.csv';
my $diff = diff $file, $target;
print $diff . "\n";
#unlink $target;
Acme-CPANAuthors-CPAN-TopDepended-ByOthers
view release on metacpan or search on metacpan
"Dist::Zilla::Plugin::CheckSelfDependency" : {
"finder" : [
":InstallModules"
]
},
"Dist::Zilla::Role::ModuleMetadata" : {
"Module::Metadata" : "1.000037",
"version" : "0.006"
}
},
"name" : "@Author::PERLANCAR/CheckSelfDependency",
"version" : "0.011"
"$Dist::Zilla::Role::MetaProvider::Provider::VERSION" : "2.002004",
"inherit_missing" : 1,
"inherit_version" : 1,
"meta_noindex" : 1
},
"Dist::Zilla::Role::ModuleMetadata" : {
"Module::Metadata" : "1.000037",
"version" : "0.006"
}
},
"name" : "@Author::PERLANCAR/MetaProvides::Package",
"version" : "2.004003"
Acme-CPANAuthors-CPAN-TopDepended
view release on metacpan or search on metacpan
"Dist::Zilla::Plugin::CheckSelfDependency" : {
"finder" : [
":InstallModules"
]
},
"Dist::Zilla::Role::ModuleMetadata" : {
"Module::Metadata" : "1.000037",
"version" : "0.006"
}
},
"name" : "@Author::PERLANCAR/CheckSelfDependency",
"version" : "0.011"
"$Dist::Zilla::Role::MetaProvider::Provider::VERSION" : "2.002004",
"inherit_missing" : 1,
"inherit_version" : 1,
"meta_noindex" : 1
},
"Dist::Zilla::Role::ModuleMetadata" : {
"Module::Metadata" : "1.000037",
"version" : "0.006"
}
},
"name" : "@Author::PERLANCAR/MetaProvides::Package",
"version" : "2.004003"
Acme-CPANAuthors-CPANTS-FiveOrMore
view release on metacpan or search on metacpan
lib/Acme/CPANAuthors/CPANTS/FiveOrMore.pm view on Meta::CPAN
See documentation for Acme::CPANAuthors for more details.
=head1 DESCRIPTION
This class provides a hash of PAUSE IDs and names of CPAN authors
who have five or more distributions in the CPANTS database.
=head1 DEVELOPMENT
The current sources of this module are found on github,
L<< git://github.com/Abigail/Acme--CPANAuthors--CPANTS--FiveOrMore.git >>.
Acme-CPANAuthors
view release on metacpan or search on metacpan
lib/Acme/CPANAuthors/Factory.pm view on Meta::CPAN
use strict;
use warnings;
use Acme::CPANAuthors;
sub create {
my ($class, %data) = @_;
my @categories = keys %data;
my %authors = map { %{ $data{$_} } } @categories;
return bless {
categories => \@categories,
authors => \%authors,
}, 'Acme::CPANAuthors';
lib/Acme/CPANAuthors/Factory.pm view on Meta::CPAN
Use this class when you have a list of authors that you want to manipulate,
but you only have the list of names at runtime (where
L<Acme::CPANAuthors::Register> is not very convenient).
An L<Acme::CPANAuthors> object will be created for you, containing the same
data as if you had registered a new class at compile time.
However, you cannot call C<< Acme::CPANAuthors->new >> with your category and
get back a new object; it still only knows about modules on disk.
=head1 METHOD
( run in 2.949 seconds using v1.01-cache-2.11-cpan-16aabcbfbcb )