Permalink
Browse files

Aa aaaaa!

  • Loading branch information...
0 parents commit e3f7f398f901c0605db71b12f4319b3f16f8115c @schwern committed Jun 23, 2011
Showing with 679 additions and 0 deletions.
  1. +15 −0 .gitignore
  2. +19 −0 Build.PL
  3. +377 −0 LICENSE
  4. +9 −0 MANIFEST
  5. +60 −0 MANIFEST.SKIP
  6. +36 −0 META.json
  7. +21 −0 META.yml
  8. +33 −0 README
  9. +106 −0 lib/AAAAAAAAA.pm
  10. +3 −0 t/AAAAAAAAA.a
@@ -0,0 +1,15 @@
+*.bak
+*~
+*.old
+Makefile
+blib/
+pm_to_blib
+Build
+_build
+cover_db/
+nytprof*
+*.patch
+.DS_Store
+MYMETA.*
+*.o
+
@@ -0,0 +1,19 @@
+use 5.006;
+use strict;
+use Module::Build;
+
+my $builder = Module::Build->new(
+ module_name => 'AAAAAAAAA',
+ license => 'perl',
+ dist_author => 'Aaaaaaa A Aaaaaaa <schwern@pobox.com>',
+
+ build_requires => {},
+ requires => {},
+
+ test_files => "t/*.a",
+
+ create_license => 1,
+ create_readme => 1,
+);
+
+$builder->create_build_script;
377 LICENSE
Oops, something went wrong.
@@ -0,0 +1,9 @@
+Build.PL
+lib/AAAAAAAAA.pm
+MANIFEST This list of files
+MANIFEST.SKIP
+t/AAAAAAAAA.a
+README
+LICENSE
+META.yml
+META.json
@@ -0,0 +1,60 @@
+
+#!start included /Users/schwern/perl5/perlbrew/perls/perl-v5.12.2/lib/5.12.2/ExtUtils/MANIFEST.SKIP
+# Avoid version control files.
+\bRCS\b
+\bCVS\b
+\bSCCS\b
+,v$
+\B\.svn\b
+\B\.git\b
+\B\.gitignore\b
+\b_darcs\b
+\B\.cvsignore$
+
+# Avoid VMS specific MakeMaker generated files
+\bDescrip.MMS$
+\bDESCRIP.MMS$
+\bdescrip.mms$
+
+# Avoid Makemaker generated and utility files.
+\bMANIFEST\.bak
+\bMakefile$
+\bblib/
+\bMakeMaker-\d
+\bpm_to_blib\.ts$
+\bpm_to_blib$
+\bblibdirs\.ts$ # 6.18 through 6.25 generated this
+
+# Avoid Module::Build generated and utility files.
+\bBuild$
+\b_build/
+\bBuild.bat$
+\bBuild.COM$
+\bBUILD.COM$
+\bbuild.com$
+
+# Avoid temp and backup files.
+~$
+\.old$
+\#$
+\b\.#
+\.bak$
+\.tmp$
+\.#
+\.rej$
+
+# 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
+
+# Avoid MYMETA files
+^MYMETA\.
+#!end included /Users/schwern/perl5/perlbrew/perls/perl-v5.12.2/lib/5.12.2/ExtUtils/MANIFEST.SKIP
+
+
@@ -0,0 +1,36 @@
+{
+ "abstract" : "Aaaaaa aaaaa aa aaaaaa Aaaaa aaaa",
+ "author" : [
+ "Aaaaaaa A Aaaaaaa <schwern@pobox.com>"
+ ],
+ "dynamic_config" : 1,
+ "generated_by" : "Module::Build version 0.38, CPAN::Meta::Converter version 2.110930",
+ "license" : [
+ "perl_5"
+ ],
+ "meta-spec" : {
+ "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
+ "version" : "2"
+ },
+ "name" : "AAAAAAAAA",
+ "prereqs" : {
+ "configure" : {
+ "requires" : {
+ "Module::Build" : "0.38"
+ }
+ }
+ },
+ "provides" : {
+ "AAAAAAAAA" : {
+ "file" : "lib/AAAAAAAAA.pm",
+ "version" : "1"
+ }
+ },
+ "release_status" : "stable",
+ "resources" : {
+ "license" : [
+ "http://dev.perl.org/licenses/"
+ ]
+ },
+ "version" : "1"
+}
@@ -0,0 +1,21 @@
+---
+abstract: 'Aaaaaa aaaaa aa aaaaaa Aaaaa aaaa'
+author:
+ - 'Aaaaaaa A Aaaaaaa <schwern@pobox.com>'
+build_requires: {}
+configure_requires:
+ Module::Build: 0.38
+dynamic_config: 1
+generated_by: 'Module::Build version 0.38, CPAN::Meta::Converter version 2.110930'
+license: perl
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
+name: AAAAAAAAA
+provides:
+ AAAAAAAAA:
+ file: lib/AAAAAAAAA.pm
+ version: 1
+resources:
+ license: http://dev.perl.org/licenses/
+version: 1
33 README
@@ -0,0 +1,33 @@
+NAME
+ AAAAAAAAA - Aaaaaa aaaaa aa aaaaaa Aaaaa aaaa
+
+SYNOPSIS
+ use AAAAAAAAA;
+
+DESCRIPTION
+ AAAAAAA AA AAA AAAAAAAAA AAAAA AA AAAAAA AAAAAA, AAAAAAA AA AAAAAA
+ AAAAAA, AAAAA AAAAAAA AAA! AA AAA AAAA AAAA AAAAAAAA AAAA AA AAAAAA
+ AAAAA
+
+ AAAA AAAA AAAAAA AA AAA!
+ AAA AAAA AAAA AAA!
+ AAAAAAA AAAAA AAA!
+ AAAAA AAAA AAA!
+ AAAA AAAAA AAA!
+ AAA AAAAAA "A" AAAA AAA!
+
+ AAAAA AAA AAA, AAAAAAA AAA AAAA, AA AAAAAA AAAAAA, AAAA AAAAA AAA!
+
+ AAAA, AA AAAAAA AAAAAA, AAAA AAAA(A) AAA! AA AAA AAAA AA AAAAA AAAAAAA
+ AAAAAAA?
+
+ AAAAAAA AA AAAAAA AAAAAA , AAAAAA AAAAA AA AAAAA AAAA AAA!
+
+ AAAAAA, AA AAAAA AAAAAAAAA AAAAAAA, AAA AAAAAAA AAAAAAAA. (AA AAAAAA
+ AAAAAA-AA, AAAAA AAAA.) AAAA, AA AAAA AAAAA'A AA AAA AAAAA, AAAA AAAA AA
+ AAA AAA AAAAAAA, AAAAAAAAAAAA AAA AAAAA (AA AAAAAAA AA AA, AA, AA AAA),
+ AA AAAAA AAAAAA AAAA AAA AA AAA AAA. AA AAAA AA AAA AAA AAAAA AAAAAA
+ AAAAAAA. AAAAA AAAAA
+
+ AAAAA AAAAA AAA AA AAAAAAA AAAA AAAAAA AAAAAA AAAAAAA
+
@@ -0,0 +1,106 @@
+package AAAAAAAAA;
+
+use strict;
+use warnings;
+
+our $VERSION = 1.00;
+
+my @aaaaaaa = ('a'..'z', 'A'..'Z', 0..9);
+my %aaa_aaa;
+for my $a (0..$#aaaaaaa) {
+ my $aaaa = sprintf("%06b", $a);
+ $aaaa =~ s{0}{a}g;
+ $aaaa =~ s{1}{A}g;
+ $aaa_aaa{ $aaaaaaa[$a] } = $aaaa;
+}
+my %aaaaaaaa_aa_aaaa = map { $_ => $aaa_aaa{$_} } @aaaaaaa;
+my %aaaa_aa_aaaaaaaa;
+@aaaa_aa_aaaaaaaa{values %aaaaaaaa_aa_aaaa} = keys %aaaaaaaa_aa_aaaa;
+
+
+sub aaaa {
+ $DB::single = 1;
+ open my $aa, $0 or die "Aaa'a aaaa aaa aaaaaa aaaa aaa aaaaaaaaaaa: $!";
+ my $aaaa = join "", <$aa>;
+ $aaaa =~ s{use\s+AAAAAAAAA\b.*\n}{};
+
+ # Aaa aaa aaaaaaa
+ if( $aaaa =~ /[b-zB-Z0-9]/ ) {
+ my $aaaaaaaa_aaaa = $aaaa;
+ aaaaaa(\$aaaa);
+ eval $aaaaaaaa_aaaa;
+ }
+ else {
+ aaaaaaaa(\$aaaa);
+ eval $aaaa;
+ }
+
+ exit;
+}
+
+sub aaaaaa {
+ my $aaaa = shift;
+
+ $$aaaa =~ s{([a-zA-Z0-9])}{ $aaaaaaaa_aa_aaaa{$1} }gex;
+
+ open my $aa, ">$0" or die "Aaa'a aaaa aaa aaaaaa aaaa aaa aaaaaaaaaaa: $!";
+ print $aa "use AAAAAAAAA;\n";
+ print $aa $$aaaa;
+
+ return;
+}
+
+
+sub aaaaaaaa {
+ my $aaaa = shift;
+
+ $$aaaa =~ s{ ([Aa]{6}) }{ $aaaa_aa_aaaaaaaa{$1} }gex;
+
+ return;
+}
+
+
+aaaa();
+
+
+=head1 NAME
+
+AAAAAAAAA - Aaaaaa aaaaa aa aaaaaa Aaaaa aaaa
+
+=head1 SYNOPSIS
+
+ use AAAAAAAAA;
+
+=head1 DESCRIPTION
+
+AAAAAAA AA AAA AAAAAAAAA AAAAA AA AAAAAA AAAAAA, AAAAAAA AA AAAAAA
+AAAAAA, AAAAA AAAAAAA AAA! AA AAA AAAA AAAA AAAAAAAA AAAA AA AAAAAA
+AAAAA
+
+ AAAA AAAA AAAAAA AA AAA!
+ AAA AAAA AAAA AAA!
+ AAAAAAA AAAAA AAA!
+ AAAAA AAAA AAA!
+ AAAA AAAAA AAA!
+ AAA AAAAAA "A" AAAA AAA!
+
+AAAAA AAA AAA, AAAAAAA AAA AAAA, AA AAAAAA AAAAAA, AAAA AAAAA AAA!
+
+
+AAAA, AA AAAAAA AAAAAA, AAAA AAAA(A) AAA!
+AA AAA AAAA AA AAAAA AAAAAAA AAAAAAA?
+
+AAAAAAA AA AAAAAA AAAAAA , AAAAAA AAAAA AA AAAAA AAAA AAA!
+
+AAAAAA, AA AAAAA AAAAAAAAA AAAAAAA, AAA AAAAAAA AAAAAAAA. (AA AAAAAA
+AAAAAA-AA, AAAAA AAAA.) AAAA, AA AAAA AAAAA'A AA AAA AAAAA, AAAA AAAA
+AA AAA AAA AAAAAAA, AAAAAAAAAAAA AAA AAAAA (AA AAAAAAA AA AA, AA, AA
+AAA), AA AAAAA AAAAAA AAAA AAA AA AAA AAA. AA AAAA AA AAA AAA AAAAA
+AAAAAA AAAAAAA. AAAAA AAAAA
+
+AAAAA AAAAA AAA AA AAAAAAA AAAA AAAAAA AAAAAA AAAAAAA
+
+=cut
+
+
+'A reckless disregard for taste';
@@ -0,0 +1,3 @@
+use AAAAAAAAA;
+aaAAAAaAaaaAaaAaaaaaAAaAaAaaAA "AAaAaA..AAaAaA\aaAAaA";
+aaAAAAaAaaaAaaAaaaaaAAaAaAaaAA "aaAAAaaaAaAa AAaAaA\aaAAaA";

0 comments on commit e3f7f39

Please sign in to comment.