{"adjusted_request":{},"match":{"distros":181,"files":2001},"version":"1.01-cache-2.11-cpan-501a3233654","results":[{"prefix":"distros/A/A1z-HTML5-Template","matches":[{"blocks":[{"start_at":"2294","matchlines":[2299],"code":"\n\t# include write_file if you submit form to the same file ( TemplateAdmin.cgi )\n\n\tsay $h->body_article( \n\n\t\theader => \"<a href='$sys{cgiurl}/TemplateAdmin.cgi' title='Refresh to get the latest/saved content'>Refresh</a> \", \n\n\t\tcontent => $h->write_file( file => \"/absolute/path/to/app/open_file_example.txt\")\n\t \n\t);\n\n"}],"file":"lib/A1z/HTML5/Template.pm"}],"distro":"A1z-HTML5-Template","files":["Changes","LICENSE","META.yml","Makefile.PL","dist.ini","lib/A1z/HTML5/Template.pm","t/00load.t","t/01sanity.t"]},{"files":["LICENSE","Makefile.PL","dist.ini"],"prefix":"distros/A/A1z-Html","matches":[{"blocks":[{"start_at":"210","matchlines":[215],"code":"\n                     END OF TERMS AND CONDITIONS\n\n        Appendix: How to Apply These Terms to Your New Programs\n\n  If you develop a new program, and you want it to be of the greatest\npossible use to humanity, the best way to achieve this is to make it\nfree software which everyone can redistribute and change under these\nterms.\n\n  To do so, attach the following notices to the program.  It is safest to\n"}],"file":"LICENSE"}],"distro":"A1z-Html"},{"files":["Changes","LICENSE","META.yml","Makefile.PL","inc/Devel/CheckLib.pm","inc/Module/Install.pm","inc/Module/Install/Can.pm","inc/Module/Install/Makefile.pm","inc/Module/Install/Metadata.pm","t/00_compile.t","t/99_pod.t","t/99_pod_coverage.t"],"matches":[{"file":"inc/Devel/CheckLib.pm","blocks":[{"code":"=head2 assert_lib\n\nThis takes several named parameters, all of which are optional, and dies\nwith an error message if any of the libraries listed can\nnot be found.  B<Note>: dying in a Makefile.PL or Build.PL may provoke\na 'FAIL' report from CPAN Testers' automated smoke testers.  Use \nC<check_lib_or_exit> instead.\n\nThe named parameters are:\n\n=over\n","start_at":"87","matchlines":[92]}]},{"blocks":[{"code":"This is intended for use in Makefile.PL / Build.PL\nwhen you might want to prompt the user for various paths and\nthings before checking that what they've told you is sane.\n\nIf any library or header is missing, it exits with an exit value of 0 to avoid\ncausing a CPAN Testers 'FAIL' report.  CPAN Testers should ignore this\nresult -- which is what you want if an external library dependency is not\navailable.\n\n=head2 check_lib\n\n","matchlines":[174],"start_at":"169"}],"file":"inc/Devel/CheckLib.pm"},{"blocks":[{"matchlines":[203,207],"start_at":"198","code":"# borrowed from Text::ParseWords\nsub _parse_line {\n    my($delimiter, $keep, $line) = @_;\n    my($word, @pieces);\n\n    no warnings 'uninitialized';  # we will be testing undef strings\n\n    while (length($line)) {\n        # This pattern is optimised to be stack conservative on older perls.\n        # Do not refactor without being careful and testing it on very long strings.\n        # See Perl bug #42980 for an example of a stack busting input.\n        $line =~ s/^\n                    (?:\n                        # double quoted string\n                        (\")                             # $quote\n"}],"file":"inc/Devel/CheckLib.pm"},{"file":"inc/Devel/CheckLib.pm","blocks":[{"code":"=head1 PLATFORMS SUPPORTED\n\nYou must have a C compiler installed.  We check for C<$Config{cc}>,\nboth literally as it is in Config.pm and also in the $PATH.\n\nIt has been tested with varying degrees of rigorousness on:\n\n=over\n\n=item gcc (on Linux, *BSD, Mac OS X, Solaris, Cygwin)\n\n","start_at":"548","matchlines":[553]}]},{"file":"inc/Devel/CheckLib.pm","blocks":[{"code":"\n=head1 WARNINGS, BUGS and FEEDBACK\n\nThis is a very early release intended primarily for feedback from\npeople who have discussed it.  The interface may change and it has\nnot been adequately tested.\n\nFeedback is most welcome, including constructive criticism.\nBug reports should be made using L<http://rt.cpan.org/> or by email.\n\nWhen submitting a bug report, please include the output from running:\n","matchlines":[579],"start_at":"574"}]},{"file":"inc/Devel/CheckLib.pm","blocks":[{"code":"\nDavid Golden E<lt>dagolden@cpan.orgE<gt>\n\nYasuhiro Matsumoto E<lt>mattn@cpan.orgE<gt>\n\nThanks to the cpan-testers-discuss mailing list for prompting us to write it\nin the first place;\n\nto Chris Williams for help with Borland support;\n\nto Tony Cook for help with Microsoft compiler command-line options\n","start_at":"598","matchlines":[603]}]}],"distro":"AAAA-Crypt-DH","prefix":"distros/A/AAAA-Crypt-DH"},{"files":["Changes","LICENSE","META.json","META.yml","Makefile.PL","t/00-compile.t","t/release-eol.t","t/release-no-tabs.t","t/release-pod-coverage.t","t/release-pod-syntax.t"],"distro":"AAAA-Mail-SpamAssassin","matches":[{"file":"Changes","blocks":[{"matchlines":[4],"start_at":"1","code":"Revision history for AAAA-Mail-SpamAssassin\n\n0.002     2012-12-14\n        - POD cleanup and minimal test\n\n0.001     2012-12-12\n        - initial CPAN release\n"}]}],"prefix":"distros/A/AAAA-Mail-SpamAssassin"},{"prefix":"distros/A/AAAAAAAAA","distro":"AAAAAAAAA","matches":[{"file":"Build.PL","blocks":[{"start_at":"15","matchlines":[20],"code":"    requires            => {},\n\n    pm_files            => {\n        \"aaa/AAAAAAAAA.pm\"              => \"lib/AAAAAAAAA.pm\"\n    },\n    test_files          => \"a/*.a\",\n);\n\n$builder->create_build_script;\n"}]}],"files":["Build.PL"]},{"files":["LICENSE","README","Todo","lib/AAC/Pvoice/Panel.pm","t/001_load.t"],"distro":"AAC-Pvoice","matches":[{"blocks":[{"code":"\t$self->{tls}->Add($rowsizer, 0, wxALIGN_CENTRE, 0);\r\n\t$self->{textrowsizer} = $rowsizer;\r\n    \r\n\t$self->{text}->SetValue(my $x = $self->RetrieveText);\r\n\t$self->{text}->SetStyle(0, length($self->{text}->GetValue), $self->{ta});\r\n\t$self->{text}->Refresh(); # Added to test it on the Mercury...added text\r\n\t\t\t\t  # isn't visible there...\r\n    }    \r\n    $self->{title}->SetBackgroundColour($self->BackgroundColour) unless $self->{disabletitle};\r\n\r\n    $self->{tls}->AddGrowableCol(0);\r\n","start_at":"343","matchlines":[348]}],"file":"lib/AAC/Pvoice/Panel.pm"},{"blocks":[{"code":"sub DisplayAddText\r\n{\r\n    my $self = shift;\r\n    push @{$self->{displaytextsave}}, $_[0];\r\n    $self->{text}->AppendText($_[0]);\r\n    $self->{text}->Refresh(); # Added to test it on the Mercury...added text\r\n                              # isn't visible there...\r\n}\r\n\r\nsub SpeechAddText\r\n{\r\n","matchlines":[442],"start_at":"437"}],"file":"lib/AAC/Pvoice/Panel.pm"},{"blocks":[{"matchlines":[464,475],"start_at":"459","code":"{\r\n    my $self = shift;\r\n    $self->{displaytextsave}=[];\r\n    $self->{speechtextsave}=[];\r\n    $self->{text}->SetValue('');\r\n    $self->{text}->Refresh(); # Added to test it on the Mercury...added text\r\n                              # isn't visible there...\r\n}\r\n\r\nsub BackspaceText\r\n{\r\n    my $self = shift;\r\n    pop @{$self->{displaytextsave}};\r\n    pop @{$self->{speechtextsave}};\r\n    $self->{text}->SetValue(my $x = $self->RetrieveText);\r\n    $self->{text}->SetStyle(0, length($self->{text}->GetValue), $self->{ta});\r\n    $self->{text}->Refresh(); # Added to test it on the Mercury...added text\r\n                              # isn't visible there...\r\n}\r\n\r\nsub SpeechRetrieveText\r\n{\r\n"}],"file":"lib/AAC/Pvoice/Panel.pm"}],"prefix":"distros/A/AAC-Pvoice"},{"files":["Build.PL","Changes","LICENSE","MANIFEST","META.yml","Makefile.PL","README","t/test.t"],"matches":[{"file":"Build.PL","blocks":[{"start_at":"8","matchlines":[13],"code":"\tmodule_name        => 'ABI',\n\tlicense            => 'perl',\n\tdist_author\t=> 'Malay <malay@bioinformatics.org>',\n\tdist_version_from => 'ABI.pm',\n\tbuild_requires =>{\n\t\t'Test::More' =>0,\n\t},\n\tadd_to_cleanup => ['ABI-*'],\n\tcreate_makefile_pl => 'traditional',\n\t\n);\n"}]}],"distro":"ABI","prefix":"distros/A/ABI"},{"matches":[{"blocks":[{"code":"README\nt/ABNF-Grammar.t\nt/ABNF-Validator.t\nt/ABNF-Generator-Liar.t\nt/ABNF-Generator-Honest.t\nt/data/test.abnf\nlib/ABNF/Grammar.pm\nlib/ABNF/Validator.pm\nlib/ABNF/Generator.pm\nlib/ABNF/Generator/Liar.pm\nlib/ABNF/Generator/Honest.pm\n","matchlines":[9],"start_at":"4"}],"file":"MANIFEST"}],"distro":"ABNF-Grammar","prefix":"distros/A/ABNF-Grammar","files":["MANIFEST","README","t/ABNF-Generator-Honest.t","t/ABNF-Generator-Liar.t","t/ABNF-Grammar.t","t/ABNF-Validator.t"]},{"files":["eg/example.mrjob","lib/AC/MrGamoo/FileList.pm"],"matches":[{"file":"lib/AC/MrGamoo/FileList.pm","blocks":[{"start_at":"33","matchlines":[38],"code":"    );\n\n=head1 IMPORTANT\n\nYou can fire up the system, and get the servers talking to each other, and\nperform some limited tests without this file.\n\nBut you must provide this file in order to actually run map/reduce jobs.\n\n=head1 DESCRIPTION\n\n"}]}],"distro":"AC-MrGamoo","prefix":"distros/A/AC-MrGamoo"},{"prefix":"distros/A/AC-Yenta","distro":"AC-Yenta","matches":[{"blocks":[{"code":"\npackage AC::Yenta::Store::Tokyo;\nuse AC::Yenta::Debug 'tokyo';\nuse strict;\n\n# does not work on sparc (tests sigbus)\n# new version does not compile with gcc 3.4.3\n#\n# faster average performance than BDB\n# worse worst-case performance than BDB\n\n","matchlines":[14],"start_at":"9"}],"file":"lib/AC/Yenta/Store/Tokyo.pm"}],"files":["eg/yenta.conf","lib/AC/Yenta/Store/Tokyo.pm"]},{"prefix":"distros/A/ACH-Generator","distro":"ACH-Generator","matches":[{"file":"lib/ACH/Generator.pm","blocks":[{"code":"May 2006\r\n\r\n=head1 DESCRIPTION\r\n\r\nACH::Generator is a simple, generic subclass of ACH used to generate ACH files.\r\nIt's intentional use is for testing purposes ONLY.  ACH-Generator will allow a \r\ndeveloper to create an ACH formatted file.\r\n\r\n=head1 USING ACH-Generator\r\n\r\n\tuse ACH::Generator;\r\n","start_at":"19","matchlines":[24]}]},{"file":"lib/ACH/Generator.pm","blocks":[{"start_at":"92","matchlines":[97],"code":"}\r\n\r\n\r\n=head2 CAVEATS\r\n\r\nThis package is created for testing purposes only.  It shouldn't be used \r\nfor production programs or scripts.  There are other commercial products\r\nout there that may be a more efficient solution for accomplishing your\r\ngoals.\r\n\r\nAll records in an ACH file must be formatted in the following sequence\r\n"}]}],"files":["README","lib/ACH/Generator.pm"]},{"prefix":"distros/A/ACH-Parser","distro":"ACH-Parser","matches":[{"blocks":[{"code":"May 2006\r\n\r\n=head1 DESCRIPTION\r\n\r\nACH::Parser is a simple, generic ACH file to ACH object parser.\r\nIt's intentional use is for testing purposes ONLY.  ACH-Parser will\r\nallow a developer to look at the particular fields in an ACH formatted\r\nfile.\r\n\r\n=head1 USING ACH-Parser\r\n\r\n","matchlines":[24],"start_at":"19"}],"file":"lib/ACH/Parser.pm"},{"file":"lib/ACH/Parser.pm","blocks":[{"start_at":"91","matchlines":[96],"code":"}\r\n\r\n\r\n=head2 CAVEATS\r\n\r\nThis package is created for testing purposes only.  It shouldn't be used \r\nfor production programs or scripts.  There are other commercial products\r\nout there that may be a more efficient solution for accomplishing your\r\ngoals.\r\n\r\nAll records in an ACH file must be formatted in the following sequence\r\n"}]}],"files":["README","lib/ACH/Parser.pm"]},{"prefix":"distros/A/ACH","distro":"ACH","matches":[{"blocks":[{"matchlines":[20],"start_at":"15","code":"May 2006\r\n\r\n=head1 DESCRIPTION\r\n\r\nACH is a simple, generic perl object that contains the data necesary to\r\ncreate an ACH file.  It's intentional use is for testing purposes ONLY.  \r\nACH will allow a developer to manipulate specific data fields in an ACH \r\nformatted object.\r\n\r\n=head1 USING ACH\r\n\r\n"}],"file":"lib/ACH.pm"},{"file":"lib/ACH.pm","blocks":[{"matchlines":[130],"start_at":"125","code":"}\r\n\r\n\r\n=head2 CAVEATS\r\n\r\nThis package is created for testing purposes only.  It shouldn't be used \r\nfor production programs or scripts.  There are other commercial products\r\nout there that may be a more efficient solution for accomplishing your\r\ngoals.\r\n\r\nAll records in an ACH file must be formatted in the following sequence\r\n"}]}],"files":["README","lib/ACH.pm"]},{"files":["Changes","META.json","META.yml","Makefile.PL","t/00-load.t","t/01-simple.t","t/boilerplate.t","t/manifest.t","t/pod-coverage.t","t/pod.t"],"prefix":"distros/A/ACL-Lite","matches":[{"blocks":[{"start_at":"15","matchlines":[20],"code":"\n0.0002 Wed May 22 15:57:12 2013 CEST\n\n    [BUG FIXES]\n\n    * Execute POD tests only during release testing.\n\n    [ENHANCEMENTS]\n\n    * Add permissions method to retrieve list or hash reference of\n      permissions.\n"}],"file":"Changes"}],"distro":"ACL-Lite"},{"files":["MANIFEST","README","t/001.t"],"distro":"ACL-Regex","matches":[{"file":"MANIFEST","blocks":[{"matchlines":[15],"start_at":"10","code":"t/acl.permit.txt\nt/acl.reject.txt\nt/action.txt\nt/actions.txt\nt/required.txt\nt/test_acl.pl\nMETA.yml                                 Module meta-data (added by MakeMaker)\n"}]}],"prefix":"distros/A/ACL-Regex"},{"files":["META.json","META.yml","Makefile.PL","README","t/00-load.t","t/01-functional.t","t/manifest.t","t/pod-coverage.t","t/pod.t"],"distro":"ACME-2026","matches":[{"blocks":[{"matchlines":[39,41],"start_at":"34","code":"         \"requires\" : {\n            \"JSON::PP\" : \"0\",\n            \"perl\" : \"5.008003\"\n         }\n      },\n      \"test\" : {\n         \"requires\" : {\n            \"Test::More\" : \"0\"\n         }\n      }\n   },\n   \"release_status\" : \"stable\",\n   \"version\" : \"0.01\",\n"}],"file":"META.json"}],"prefix":"distros/A/ACME-2026"},{"files":["LICENSE","META.json","META.yml","Makefile.PL","README","dist.ini","lib/ACME/CPANPLUS/Module/With/Core/PreReq.pm","t/00-compile.t","t/01_fail.t","t/99_pod.t","t/99_pod_coverage.t","t/author-pod-coverage.t","t/author-pod-syntax.t"],"prefix":"distros/A/ACME-CPANPLUS-Module-With-Core-PreReq","distro":"ACME-CPANPLUS-Module-With-Core-PreReq","matches":[{"file":"lib/ACME/CPANPLUS/Module/With/Core/PreReq.pm","blocks":[{"code":"package ACME::CPANPLUS::Module::With::Core::PreReq;\n$ACME::CPANPLUS::Module::With::Core::PreReq::VERSION = '0.06';\n#ABSTRACT: Fake module with a prereq that is a core module for testing CPANPLUS\n\nuse strict;\nuse warnings;\n\nqq[Nobody here but us chickens];\n","start_at":"1","matchlines":[3]}]},{"file":"lib/ACME/CPANPLUS/Module/With/Core/PreReq.pm","blocks":[{"code":"\n=encoding UTF-8\n\n=head1 NAME\n\nACME::CPANPLUS::Module::With::Core::PreReq - Fake module with a prereq that is a core module for testing CPANPLUS\n\n=head1 VERSION\n\nversion 0.06\n\n","matchlines":[18],"start_at":"13"}]},{"file":"lib/ACME/CPANPLUS/Module/With/Core/PreReq.pm","blocks":[{"code":" cpanp -i ACME::CPANPLUS::Module::With::Core::PreReq\n\n=head1 DESCRIPTION\n\nACME::CPANPLUS::Module::With::Core::PreReq is a fake module that has a prerequisite of a core module\nso I can test something in L<CPANPLUS> and L<CPANPLUS::YACSmoke>\n\nNo moving parts and nothing to see.\n\n=head1 AUTHOR\n\n","start_at":"28","matchlines":[33]}]}]},{"matches":[{"file":"lib/ACME/Dzil/Test/daemon.pm","blocks":[{"matchlines":["1"],"start_at":"1","code":"package ACME::Dzil::Test::daemon;\n\n# Module version\nour $VERSION = '0.001';\n\n# Perl minimum version\n"}]},{"file":"lib/ACME/Dzil/Test/daemon.pm","blocks":[{"code":"\n1;\n\n=head1 NAME\n\nACME::Dzil::Test::daemon - Module abstract placeholder text\n\n=head1 SYNOPSIS\n\n=for comment Brief examples of using the module.\n\n","start_at":"17","matchlines":[22]}]}],"distro":"ACME-Dzil-Test-daemon","prefix":"distros/A/ACME-Dzil-Test-daemon","files":["Changes","MANIFEST","META.json","META.yml","Makefile.PL","README","dist.ini","lib/ACME/Dzil/Test/daemon.pm","t/00-report-prereqs.dd","t/00-report-prereqs.t","xt/author/00-compile.t","xt/author/pod-syntax.t"]},{"files":["Changes","MANIFEST","META.json","META.yml","Makefile.PL","README","README.md","dist.ini","lib/ACME/Dzil/Test/daemon2.pm","t/00-report-prereqs.dd","t/00-report-prereqs.t","xt/author/00-compile.t","xt/author/pod-syntax.t"],"distro":"ACME-Dzil-Test-daemon2","matches":[{"file":"lib/ACME/Dzil/Test/daemon2.pm","blocks":[{"code":"package ACME::Dzil::Test::daemon2;\n\n# Module version\nour $VERSION = '0.001';\n\n# Perl minimum version\n","matchlines":["1"],"start_at":"1"}]},{"file":"lib/ACME/Dzil/Test/daemon2.pm","blocks":[{"code":"\n1;\n\n=head1 NAME\n\nACME::Dzil::Test::daemon2 - Module abstract placeholder text\n\n=head1 SYNOPSIS\n\n=for comment Brief examples of using the module.\n\n","start_at":"17","matchlines":[22]}]}],"prefix":"distros/A/ACME-Dzil-Test-daemon2"},{"distro":"ACME-Error-31337","matches":[{"file":"test.pl","blocks":[{"code":"# Before `make install' is performed this script should be runnable with\n# `make test'. After `make install' it should work as `perl test.pl'\n\n######################### We start with some black magic to print on failure.\n\n# Change 1..1 below to 1..last_test_to_print .\n# (It may become useful if the test is moved to ./t subdirectory.)\n\nBEGIN { $| = 1; print \"1..1\\n\"; }\nEND {print \"not ok 1\\n\" unless $loaded;}\nuse ACME::Error::31337;\n$loaded = 1;\nprint \"ok 1\\n\";\n\n######################### End of black magic.\n\n# Insert your test code below (better if it prints \"ok 13\"\n# (correspondingly \"not ok 13\") depending on the success of chunk 13\n# of the test code):\n\n","matchlines":[2,6,7,17,19],"start_at":"1"}]}],"prefix":"distros/A/ACME-Error-31337","files":["MANIFEST","test.pl"]},{"matches":[{"file":"test.pl","blocks":[{"matchlines":[2,6,7,17,19],"start_at":"1","code":"# Before `make install' is performed this script should be runnable with\n# `make test'. After `make install' it should work as `perl test.pl'\n\n######################### We start with some black magic to print on failure.\n\n# Change 1..1 below to 1..last_test_to_print .\n# (It may become useful if the test is moved to ./t subdirectory.)\n\nBEGIN { $| = 1; print \"1..1\\n\"; }\nEND {print \"not ok 1\\n\" unless $loaded;}\nuse ACME::Error::Coy;\n$loaded = 1;\nprint \"ok 1\\n\";\n\n######################### End of black magic.\n\n# Insert your test code below (better if it prints \"ok 13\"\n# (correspondingly \"not ok 13\") depending on the success of chunk 13\n# of the test code):\n\n"}]}],"distro":"ACME-Error-Coy","prefix":"distros/A/ACME-Error-Coy","files":["MANIFEST","test.pl"]},{"distro":"ACME-Error-HTML","matches":[{"file":"test.pl","blocks":[{"start_at":"1","matchlines":[2,6,7,17,19],"code":"# Before `make install' is performed this script should be runnable with\n# `make test'. After `make install' it should work as `perl test.pl'\n\n######################### We start with some black magic to print on failure.\n\n# Change 1..1 below to 1..last_test_to_print .\n# (It may become useful if the test is moved to ./t subdirectory.)\n\nBEGIN { $| = 1; print \"1..1\\n\"; }\nEND {print \"not ok 1\\n\" unless $loaded;}\nuse ACME::Error::HTML;\n$loaded = 1;\nprint \"ok 1\\n\";\n\n######################### End of black magic.\n\n# Insert your test code below (better if it prints \"ok 13\"\n# (correspondingly \"not ok 13\") depending on the success of chunk 13\n# of the test code):\n\n"}]}],"prefix":"distros/A/ACME-Error-HTML","files":["MANIFEST","test.pl"]},{"files":["MANIFEST","test.pl"],"prefix":"distros/A/ACME-Error-IgpayAtinlay","distro":"ACME-Error-IgpayAtinlay","matches":[{"blocks":[{"code":"# Before `make install' is performed this script should be runnable with\n# `make test'. After `make install' it should work as `perl test.pl'\n\n######################### We start with some black magic to print on failure.\n\n# Change 1..1 below to 1..last_test_to_print .\n# (It may become useful if the test is moved to ./t subdirectory.)\n\nBEGIN { $| = 1; print \"1..1\\n\"; }\nEND {print \"not ok 1\\n\" unless $loaded;}\nuse ACME::Error::IgpayAtinlay;\n$loaded = 1;\nprint \"ok 1\\n\";\n\n######################### End of black magic.\n\n# Insert your test code below (better if it prints \"ok 13\"\n# (correspondingly \"not ok 13\") depending on the success of chunk 13\n# of the test code):\n\n","matchlines":[2,6,7,17,19],"start_at":"1"}],"file":"test.pl"}]},{"files":["MANIFEST","test.pl"],"matches":[{"file":"test.pl","blocks":[{"matchlines":[2,6,7,17,19],"start_at":"1","code":"# Before `make install' is performed this script should be runnable with\n# `make test'. After `make install' it should work as `perl test.pl'\n\n######################### We start with some black magic to print on failure.\n\n# Change 1..1 below to 1..last_test_to_print .\n# (It may become useful if the test is moved to ./t subdirectory.)\n\nBEGIN { $| = 1; print \"1..1\\n\"; }\nEND {print \"not ok 1\\n\" unless $loaded;}\nuse ACME::Error::Translate;\n$loaded = 1;\nprint \"ok 1\\n\";\n\n######################### End of black magic.\n\n# Insert your test code below (better if it prints \"ok 13\"\n# (correspondingly \"not ok 13\") depending on the success of chunk 13\n# of the test code):\n\n"}]}],"distro":"ACME-Error-Translate","prefix":"distros/A/ACME-Error-Translate"},{"files":["MANIFEST","test.pl"],"prefix":"distros/A/ACME-Error","matches":[{"blocks":[{"start_at":"1","matchlines":[2,6,7,17,19],"code":"# Before `make install' is performed this script should be runnable with\n# `make test'. After `make install' it should work as `perl test.pl'\n\n######################### We start with some black magic to print on failure.\n\n# Change 1..1 below to 1..last_test_to_print .\n# (It may become useful if the test is moved to ./t subdirectory.)\n\nBEGIN { $| = 1; print \"1..1\\n\"; }\nEND {print \"not ok 1\\n\" unless $loaded;}\nuse ACME::Error;\n$loaded = 1;\nprint \"ok 1\\n\";\n\n######################### End of black magic.\n\n# Insert your test code below (better if it prints \"ok 13\"\n# (correspondingly \"not ok 13\") depending on the success of chunk 13\n# of the test code):\n\n"}],"file":"test.pl"}],"distro":"ACME-Error"},{"files":["META.json","META.yml","Makefile.PL","README","t/00-load.t","t/01-sum.t","t/boilerplate.t","t/manifest.t","t/pod-coverage.t","t/pod.t"],"prefix":"distros/A/ACME-MBHall","distro":"ACME-MBHall","matches":[{"blocks":[{"matchlines":[35],"start_at":"30","code":"            \"ExtUtils::MakeMaker\" : \"0\"\n         }\n      },\n      \"runtime\" : {\n         \"requires\" : {\n            \"Test::More\" : \"0\"\n         }\n      }\n   },\n   \"release_status\" : \"stable\",\n   \"version\" : \"0.03\"\n"}],"file":"META.json"}]},{"prefix":"distros/A/ACME-MSDN-SPUtility","matches":[{"file":"Changes","blocks":[{"code":"\t\tFix POD encoding, disable initialize();\n0.03\t2009.04.03/ 21:26 CST\n\t\tFix few typo\n0.04\t2009.04.04/ 15:44 CST\n\t\tadded Perl6::Say in Makefile.PL\n\t\tto avoid make test error on darwin <http://www.nntp.perl.org/group/perl.cpan.testers/2009/04/msg3617464.html>\n\n","matchlines":[11],"start_at":"6"}]}],"distro":"ACME-MSDN-SPUtility","files":["Changes","Makefile.PL","README","t/00-load.t","t/boilerplate.t","t/pod-coverage.t","t/pod.t"]},{"files":["META.json","META.yml","Makefile.PL","README","t/00-load.t","t/manifest.t","t/pod-coverage.t","t/pod.t"],"prefix":"distros/A/ACME-MyFirstModule-SETHS","distro":"ACME-MyFirstModule-SETHS","matches":[{"file":"META.json","blocks":[{"code":"      ]\n   },\n   \"prereqs\" : {\n      \"build\" : {\n         \"requires\" : {\n            \"Test::More\" : \"0\"\n         }\n      },\n      \"configure\" : {\n         \"requires\" : {\n            \"ExtUtils::MakeMaker\" : \"0\"\n","start_at":"20","matchlines":[25]}]}]},{"files":["META.yml","Makefile.PL","README","t/00-load.t","t/manifest.t","t/pod-coverage.t","t/pod.t"],"matches":[{"file":"META.yml","blocks":[{"start_at":"9","matchlines":[14],"code":"configure_requires:\r\n    ExtUtils::MakeMaker:  0\r\nbuild_requires:\r\n    ExtUtils::MakeMaker:  0\r\nrequires:\r\n    Test::More:  0\r\nno_index:\r\n    directory:\r\n        - t\r\n        - inc\r\ngenerated_by:       ExtUtils::MakeMaker version 6.56\r\n"}]}],"distro":"ACME-PM-Voronezh","prefix":"distros/A/ACME-PM-Voronezh"},{"distro":"ACME-QuoteDB","matches":[{"blocks":[{"code":"\n    my $sq = ACME::QuoteDB->new;\n\n    print $sq->get_quote;\n\n    # examples are based on quotes data in the test database. \n    # (see tests t/data/)\n\n    # get specific quote based on basic text search.\n    # search all 'ralph' quotes for string 'wookie'\n    print $sq->get_quotes_contain({\n                  Contain   => 'wookie', \n","matchlines":[801,802],"start_at":"796"}],"file":"lib/ACME/QuoteDB.pm"},{"blocks":[{"code":"\n\n=head1 LOADING QUOTES\n\nIn order to actually use this module, one has to load quotes content,\nhopefully this is relativly easy,... (see t/01-load_quotes.t in tests)\n\n=over 4\n\n=item 1 add_quote, one record at a time, probably within an iteration loop\n\nsee L</add_quote>\n\n=item 1 (Batch Load) load quotes from a csv file. (tested with comma and tab delimiters)\n\n  format of file must be as follows: (headers)\n  \"Quote\", \"Attribution Name\", \"Attribution Source\", \"Category\", \"Rating\"\n \n  for example:\n","matchlines":[1090,1098],"start_at":"1085"}],"file":"lib/ACME/QuoteDB.pm"},{"file":"lib/ACME/QuoteDB.pm","blocks":[{"start_at":"1106","matchlines":[1111],"code":"  \"Sideshow Bob has no decency. He called me Chief Piggum. (laughs) Oh wait, I get it, he's all right.\",\"Chief Wiggum\",\"The Simpsons\",\"Humor\",8\n\n=item 1 if these dont suit your needs, ACME::QuoteDB::LoadDB is sub-classable, \n\n  so one can extract data anyway they like and populate the db themselves. \n  (there is a test that illustrates overriding the stub method, 'dbload')\n\n   you need to populate a record data structure:\n\n    $self->set_record(quote  => q{}); # mandatory\n    $self->set_record(name   => q{}); # mandatory\n"}]},{"file":"lib/ACME/QuoteDB.pm","blocks":[{"start_at":"1139","matchlines":[1144],"code":"    # Attr\n    # Quote\n    # Catg\n    # QuoteCatg\n\n    pod tests incorrectly state, Attr, Quote and Catg are subroutines, well they\n    are,... (as aliases) but act on a different object. \n    \n    TODO: explore the above (is this a bug, if so, who's?, version effected, \n    create use case, etc) \n    \n"}]},{"file":"lib/ACME/QuoteDB.pm","blocks":[{"matchlines":[1200],"start_at":"1195","code":"(Since the local mode is sqlite3, the file doesn't even need to exist, just\nneeds read/write access to the path on the filesystem)\n\nSet the environmental variable:\n\n$ENV{ACME_QUOTEDB_PATH} (untested on windows)\n\n(this has to be set before trying a database load and also (everytime before \nusing this module, obviouly)\n\nSomething such as:\n"}]},{"file":"lib/ACME/QuoteDB.pm","blocks":[{"start_at":"1252","matchlines":[1257],"code":"\nL<version>(pragma - version numbers)\n\nL<aliased>\n\nL<Test::More>\n\nL<DBD::SQLite>\n\nL<DBI>\n\n"}]},{"file":"lib/ACME/QuoteDB.pm","blocks":[{"start_at":"1313","matchlines":[1318],"code":"\n=item 1 add a dump backup to csv\n\na backup mechanism for your db to a regular text csv file.\n\n=item 1 clean up tests 'skip if module X' not installed\n\n(one of sqlite3 or mysql is required). currently dies if DBD::SQLite not\ninstalled\n\n=item 1 support multiple categories from LoadDB\n"}]},{"file":"lib/ACME/QuoteDB.pm","blocks":[{"matchlines":[1409],"start_at":"1404","code":"\nThe construction of this module was guided by:\n\nPerl Best Practices - Conway\n\nTest Driven Development\n\nObject Oriented Programming\n\nGnu\n\n"}]},{"file":"lib/ACME/QuoteDB.pm","blocks":[{"code":"    Q: Why did you put it in the ACME namespace?\n    A: Seemed appropriate. I emailed modules@cpan.org and didn't get a\n       different reaction.\n\n    Q: Why did you write this?\n    A: At a past company, a team I worked on a project with had a test suite, \n    in which at the completion of successful tests (100%), a 'wisenheimer' \n    success message would be printed. (Like a quote or joke or the like)\n    (Interestingly, it added a 'fun' factor to testing, not that one is needed \n    of course ;). It was hard to justify spending company time to find and \n    add decent content to the hand rolled process, this would have helped.\n\n    Q: Don't you have anything better to do, like some non-trivial work?\n    A: Yup\n","start_at":"1430","matchlines":[1435,1436,1438]}]}],"prefix":"distros/A/ACME-QuoteDB","files":["Build.PL","Changes","META.yml","README","lib/ACME/QuoteDB.pm","lib/ACME/QuoteDB/DB/DBI.pm","lib/ACME/QuoteDB/DB/quotedb/quotes.db","lib/ACME/QuoteDB/LoadDB.pm","t/00-load.t","t/01-load_quotes.t","t/02-get_quotes.t","t/03-load_quotes_env.t","t/04-get_quotes_more.t","t/04-load_get_quote_utf8.t","t/05-load_quotes_remote.t","t/boilerplate.t","t/data/python_quotes.txt","t/data/www.amk.ca/quotations/python-quotes/index.html","t/pod-coverage.t","t/pod.t"]}],"search_in_progress":0,"is_incomplete":1,"time_elapsed":"0.784","is_a_known_distro":false}