Result:
found more than 499 distributions - search limited to the first 2001 files matching your query
( run in 0.840 )
Acme-MyFirstModule-Tracers
view release on metacpan or search on metacpan
lib/Acme/MyFirstModule/Tracers.pm view on Meta::CPAN
# Preloaded methods go here.
1;
__END__
# Below is stub documentation for your module. You'd better edit it!
=head1 NAME
Acme::MyFirstModule::Tracers - Perl extension for blah blah blah
lib/Acme/MyFirstModule/Tracers.pm view on Meta::CPAN
=head1 DESCRIPTION
Stub documentation for Acme::MyFirstModule::Tracers, created by h2xs. It looks like the
author of the extension was negligent enough to leave the stub
unedited.
Blah blah blah.
=head2 EXPORT
Acme-NabeAtzz
view release on metacpan or search on metacpan
/* ppport.h -- Perl/Pollution/Portability Version 2.011
*
* Automatically Created by Devel::PPPort on Mon Jun 23 18:02:46 2008
*
* Do NOT edit this file directly! -- Edit PPPort.pm instead.
*
* Version 2.x, Copyright (C) 2001, Paul Marquess.
* Version 1.x, Copyright (C) 1999, Kenneth Albanowski.
* This code may be used and distributed under the same license as any
* version of Perl.
Acme-Octarine
view release on metacpan or search on metacpan
Octarine.pm view on Meta::CPAN
return $object;
};
1;
__END__
# Below is stub documentation for your module. You'd better edit it!
=head1 NAME
Acme::Octarine - Provides Octarine support for Acme::Colour
Acme-OneHundredNotOut
view release on metacpan or search on metacpan
OneHundredNotOut.pm view on Meta::CPAN
recent history.
=head2 The Embarrassing Past
Contrary to popular belief, I was not always a CPAN author. I started
writing modules in 1998, immediately after reading the first edition of
the Perl Cookbook - yes, you can blame Nat and Tom for all this. The
first module that I released was L<Tie::DiscoveryHash>, since I'd just
learnt about tied hashes. As with many of my modules, it was an integral
part of another software project which I actually never finished, and
now can't find.
Acme-PETEK-Testkit
view release on metacpan or search on metacpan
lib/Acme/PETEK/Testkit.pm view on Meta::CPAN
under the same terms as Perl itself.
This library has also been released under a Creative Commons license
at the request of the YAPC::NA 2005 organizers. See
L<http://creativecommons.org/licenses/by/2.0/ca/> for more information;
in short, please give credit to the author should you use this code
elsewhere.
=cut
1; # End of Acme::PETEK::Testkit
Acme-PM-Barcelona
view release on metacpan or search on metacpan
lib/Acme/PM/Barcelona/12x5_ca.pod view on Meta::CPAN
SendKeys($url);
SendKeys('~'); # Intro
sleep(2);
}
=head3 Automatizació d'un editor de text
use X11::GUITest qw/StartApp SendKeys/;
StartApp('gedit');
SendKeys('~~');
SendKeys("Mireu, sense mans!!\n");
sleep(2);
SendKeys("~Amplio la finestra...\n");
Acme-PM-Berlin-Meetings
view release on metacpan or search on metacpan
lib/Acme/PM/Berlin/Meetings/History.pod view on Meta::CPAN
Zugang auch ueber Novalisstr 11 (Verlaengerung der Eichendorffstr).
U6 Oranienburger Tor, S-Nordbahn, Tram
oesterreichisch-mediterane Kueche
Stadtplan
L<http://www.berliner-stadtplan.com/topic/bln/str/x_wgs/23.26/y_wgs/31.69/from/form.html>
=head2 Treffen im Juli 2006
Acme-PM-Paris-Meetings
view release on metacpan or search on metacpan
<comment></comment>
<projects>
</projects>
<buildSpec>
<buildCommand>
<name>org.epic.perleditor.perlbuilder</name>
<arguments>
</arguments>
</buildCommand>
</buildSpec>
<natures>
<nature>org.epic.perleditor.perlnature</nature>
</natures>
</projectDescription>
Acme-Padre-PlayCode
view release on metacpan or search on metacpan
lib/Acme/Padre/PlayCode.pm view on Meta::CPAN
$playapp->load_plugin( $plugin );
my $played = $playapp->play($code);
if ( $src ) {
my $editor = $main->current->editor;
$editor->ReplaceSelection( $played );
} else {
$doc->text_set( $played );
}
}
Acme-Pi
view release on metacpan or search on metacpan
inc/MyBumpVersionAfterRelease.pm view on Meta::CPAN
sub after_release
{
my $self = shift;
# edits dist.ini to add one decimal point to the version
my $Ï€ = atan2(1,1) * 4;
my $original_version = $self->zilla->version;
my $length = length($original_version);
# add another digit if we added a 0, as it will be numerically identical
do {} while substr($Ï€, $length++, 1) eq '0';
my $new_version = substr($Ï€, 0, $length);
# munge dist.ini to edit version line
my $path = path('dist.ini');
my $content = $path->slurp_utf8;
my $delta_length = $length - length($original_version);
Acme-Playpen
view release on metacpan or search on metacpan
lib/Tupelo/Munge.pm view on Meta::CPAN
It is possible for mutation to change the number of slots in a tuple,
but this is a relatively expensive operation that should be avoided.
Other than writing to a single slot and replacement of the complete
sequence of slot values, tuples do not naturally support operations to
edit the slot value sequence, such as adding an object reference onto
the end of a tuple. Such an operation can be constructed via complete
replacement of a tuple's slot value sequence, but if the desire to do
that arises then it suggests that an array would be a more appropriate
data structure.
Acme-Pointer
view release on metacpan or search on metacpan
lib/Acme/ppport.h view on Meta::CPAN
lib/Acme/ppport.h -- Perl/Pollution/Portability Version 3.32
Automatically created by Devel::PPPort running under perl 5.024001.
Do NOT edit this file directly! -- Edit PPPort_pm.PL and the
includes in parts/inc/ instead.
Use 'perldoc lib/Acme/ppport.h' to view the documentation below.
----------------------------------------------------------------------
lib/Acme/ppport.h view on Meta::CPAN
sub strip
{
my $self = do { local(@ARGV,$/)=($0); <> };
my($copy) = $self =~ /^=head\d\s+COPYRIGHT\s*^(.*?)^=\w+/ms;
$copy =~ s/^(?=\S+)/ /gms;
$self =~ s/^$HS+Do NOT edit.*?(?=^-)/$copy/ms;
$self =~ s/^SKIP.*(?=^__DATA__)/SKIP
if (\@ARGV && \$ARGV[0] eq '--unstrip') {
eval { require Devel::PPPort };
\$@ and die "Cannot require Devel::PPPort, please install.\\n";
if (eval \$Devel::PPPort::VERSION < $VERSION) {
Acme-Rant
view release on metacpan or search on metacpan
ok RANT {
You know, some people just don't have a sense of humor.
<ua> That's humor for you. It's like a lady getting out of a car.
Sometimes you see it, sometimes you don't.
<ua> (Credit: Funny Bones)
};
Acme-Ref
view release on metacpan or search on metacpan
/* ppport.h -- Perl/Pollution/Portability Version 2.0002
*
* Automatically Created by Devel::PPPort on Thu Jun 19 18:50:59 2003
*
* Do NOT edit this file directly! -- Edit PPPort.pm instead.
*
* Version 2.x, Copyright (C) 2001, Paul Marquess.
* Version 1.x, Copyright (C) 1999, Kenneth Albanowski.
* This code may be used and distributed under the same license as any
* version of Perl.
Acme-ReturnValue
view release on metacpan or search on metacpan
# This file is generated by Dist::Zilla::Plugin::CPANFile v6.017
# Do not edit this file directly. To change prereqs, edit the `dist.ini` file.
requires "Archive::Any" => "0";
requires "Data::Dumper" => "0";
requires "Encode" => "0";
requires "File::Copy" => "0";
Acme-RunDoc
view release on metacpan or search on metacpan
lib/Acme/RunDoc.pm view on Meta::CPAN
Acme::RunDoc->do("helloworld.doc");
=head1 DESCRIPTION
It is recieved wisdom that word processors are better than text editors.
After all, you can style your documents with different fonts and colours;
you can take advantage of the built-in spell check; and your ugly single
and double quote characters get auto-replaced with "smart" curly versions.
This module allows you to run Perl documents edited in Microsoft Word
(and other word processors capable of saving in the ".doc" format) as
normal Perl code. You can write scripts and run them like this:
perl -Microsoft::Word helloworld.doc
Acme-SWUECHO-Meta
view release on metacpan or search on metacpan
tidyall.ini view on Meta::CPAN
[PerlCritic]
select = lib/**/*.pm
argv = --profile $ROOT/perlcriticrc
except_modes = editor
[Perl::AlignMooseAttributes]
select = lib/**/*.pm
[Perl::IgnoreMethodSignaturesSimple]
Acme-September-Eternal
view release on metacpan or search on metacpan
lib/Acme/September/Eternal.pm view on Meta::CPAN
return $result;
}
1;
__END__
# Below is stub documentation for your module. You'd better edit it!
=head1 NAME
Acme::September::Eternal - Calculate the "eternal september" date string
Acme-Signature-Arity
view release on metacpan or search on metacpan
lib/Acme/Signature/Arity.pod view on Meta::CPAN
=encoding utf8
=for comment POD_DERIVED_INDEX_GENERATED
The following documentation is automatically generated. Please do not edit
this file, but rather the original, inline with Acme::Signature::Arity
at lib/Acme/Signature/Arity.pm
(on the system that originally ran this).
If you do edit this file, and don't want your changes to be removed, make
sure you change the first line.
=cut
=head1 NAME
Acme-Snark
view release on metacpan or search on metacpan
}
}
1;
__END__
# Below is the stub of documentation for your module. You better edit it!
# And if I don't? Who ya gonna tell?
=head1 NAME
Acme::Snark - What I tell you three times is true
Acme-Sort-Sleep
view release on metacpan or search on metacpan
local/lib/perl5/Future.pm view on Meta::CPAN
=item *
"The Past, The Present and The Future" - slides from a talk given at the
London Perl Workshop, 2012.
L<https://docs.google.com/presentation/d/1UkV5oLcTOOXBXPh8foyxko4PR28_zU_aVx6gBms7uoo/edit>
=item *
"Futures advent calendar 2013"
Acme-SubstituteSubs
view release on metacpan or search on metacpan
lib/Acme/SubstituteSubs.pm view on Meta::CPAN
exec 'perl', $0;
=head1 DESCRIPTION
Replaces subroutine definitions in the source code, probably for code that edits
itself or lets its user edit it.
=head2 C<< Acme::SubstituteSubs->get($qualified_function_name) >>
Returns the text of the named function straight from the source file.
For the purposes of this module, all code comes from and goes to the top-level C<.pl> file
lib/Acme/SubstituteSubs.pm view on Meta::CPAN
C<die>s if it fails to write and replace the original source file.
=head2 C<< Acme::SubstituteSubs->list() >>
Lists C<namespace::function> combinations available for edit.
=head2 C<< Acme::SubstituteSubs->list_packages() >>
Lists packages defined in the source script.
Acme-Takahashi-Method
view release on metacpan or search on metacpan
lib/Acme/Takahashi/Method.pm view on Meta::CPAN
exit;
}
1;
__END__
# Below is stub documentation for your module. You'd better edit it!
=head1 NAME
Acme::Takahashi::Method - turns your script into slides accordingly to the Takahashi Method
Acme-TestDist-Cpp-EUMM-EUCppGuess
view release on metacpan or search on metacpan
ppport.h -- Perl/Pollution/Portability Version 3.32
Automatically created by Devel::PPPort running under perl 5.020001.
Do NOT edit this file directly! -- Edit PPPort_pm.PL and the
includes in parts/inc/ instead.
Use 'perldoc ppport.h' to view the documentation below.
----------------------------------------------------------------------
sub strip
{
my $self = do { local(@ARGV,$/)=($0); <> };
my($copy) = $self =~ /^=head\d\s+COPYRIGHT\s*^(.*?)^=\w+/ms;
$copy =~ s/^(?=\S+)/ /gms;
$self =~ s/^$HS+Do NOT edit.*?(?=^-)/$copy/ms;
$self =~ s/^SKIP.*(?=^__DATA__)/SKIP
if (\@ARGV && \$ARGV[0] eq '--unstrip') {
eval { require Devel::PPPort };
\$@ and die "Cannot require Devel::PPPort, please install.\\n";
if (eval \$Devel::PPPort::VERSION < $VERSION) {
Acme-TextLayout
view release on metacpan or search on metacpan
lib/Acme/TextLayout.pm view on Meta::CPAN
making the pattern must be adjacent, and must be rectangular. And
the overall pattern must be rectangular.
Note that this textual arrangement can be as big as you want.
It's all relative. Although it might not look like it on
the screen in your editor of choice, all spacing is assummed to
be the same in X and Y. Thus, the aspect ratio of the above
pattern is 16/7 (width/height).
To be useful for a GUI, one must be able to map this goofy space
into screen coordinates. That's what the B<map_range> function is
Acme-Thing
view release on metacpan or search on metacpan
lib/Acme/Thing.pm view on Meta::CPAN
Acme::Thing::TVSeries::BreakingBad_2008_2013
Acme::Thing::TvSeries::CornerGas_2004_2009
and for a book title the C<$NAME> could be the title (without the subtitle) of
the book, preferrably with the publication year. Subsequent editions of a book
should be named using the C<nE> notation. Examples:
Acme::Thing::Book::ProgrammingPerl_1991
Acme::Thing::Book::ProgrammingPerl_4E_2012
Acme-Tie-Formatted
view release on metacpan or search on metacpan
0.03 Thu Mar 12 22:05:57 PDT 2009
- Changed name to Acme::Tie::Formatted because, let's face it,
this is kind of a silly module.
0.02 Tue Feb 7 12:22:19 PST 2006
- Credit where credit is due added to the documentation.
- Fixed MANIFEST to include all the tests.
0.01 Tue Feb 7 10:51:42 2006
- Initial release.
Acme-Tools
view release on metacpan or search on metacpan
return $txt;
}
=head2 ccn_ok
Checks if a Credit Card number (CCN) has correct control digits according to the LUHN-algorithm from 1960.
This method of control digits is used by MasterCard, Visa, American Express,
Discover, Diners Club / Carte Blanche, JCB and others.
B<Input:>
A credit card number. Can contain non-digits, but they are removed internally before checking.
B<Output:>
Something true or false.
Returns C<undef> (false) if the input argument is missing digits.
Returns 0 (zero, which is false) is the digits is not correct according to the LUHN algorithm.
Returns 1 or the name of a credit card company (true either way) if the last digit is an ok control digit for this ccn.
The name of the credit card company is returned like this (without the C<'> character)
Returns (wo '') Starts on Number of digits
------------------------------ ------------------------ ----------------
'MasterCard' 51-55 16
'Visa' 4 13 eller 16
If the control digits is valid, but the input does not match anything in the column C<starts on>, 1 is returned.
(This is also the same control digit mechanism used in Norwegian KID numbers on payment bills)
The first digit in a credit card number is supposed to tell what "industry" the card is meant for:
MII Digit Value Issuer Category
--------------------------- ----------------------------------------------------
0 ISO/TC 68 and other industry assignments
1 Airlines
...although this has no meaning to C<Acme::Tools::ccn_ok()>.
The first six digits is I<Issuer Identifier>, that is the bank
(probably). The rest in the "account number", except the last digits,
which is the control digit. Max length on credit card numbers are 19
digits.
=cut
sub ccn_ok {
my $ccn=shift(); #credit card number
$ccn=~s/\D+//g;
if(KID_ok($ccn)){
return "MasterCard" if $ccn=~/^5[1-5]\d{14}$/;
return "Visa" if $ccn=~/^4\d{12}(?:\d{3})?$/;
return "American Express" if $ccn=~/^3[47]\d{13}$/;
Checks if a norwegian KID number has an ok control digit.
To check if a customer has typed the number correctly.
This uses the LUHN algorithm (also known as mod-10) from 1960 which is also used
internationally in control digits for credit card numbers, and Canadian social security ID numbers as well.
The algorithm, as described in Phrack (47-8) (a long time hacker online publication):
"For a card with an even number of digits, double every odd numbered
digit and subtract 9 if the product is greater than 9. Add up all the
=head2 ed
String editor commands
literals: a-z 0-9 space
move cursor: FBAEPN MF MB ME
delete: D Md
up/low/camelcase word U L C
Acme-Unicodify
view release on metacpan or search on metacpan
CODE_OF_CONDUCT.md view on Meta::CPAN
Community leaders are responsible for clarifying and enforcing our standards of
acceptable behavior and will take appropriate and fair corrective action in
response to any behavior that they deem inappropriate, threatening, offensive,
or harmful.
Community leaders have the right and responsibility to remove, edit, or reject
comments, commits, code, wiki edits, issues, and other contributions that are
not aligned to this Code of Conduct, and will communicate reasons for moderation
decisions when appropriate.
## Scope
Acme-WTF
view release on metacpan or search on metacpan
# This Makefile is for the Acme::WTF extension to perl.
#
# It was generated automatically by MakeMaker version
# 6.62 (Revision: 66200) from the contents of
# Makefile.PL. Don't edit this file, edit Makefile.PL instead.
#
# ANY CHANGES MADE HERE WILL BE LOST!
#
# MakeMaker ARGV: ()
#
( run in 0.840 second using v1.01-cache-2.11-cpan-de7293f3b23 )