?????????? ????????? - ??????????????? - /home/agenciai/public_html/cd38d8/xt.zip
???????
PK � �[� � B B dependent-modules.tnu �[��� use strict; use warnings; use Test::Needs qw( Test::DependentModules ); use Test::DependentModules qw( test_modules ); use Test::More; my @modules = ('HTTP::Message'); SKIP: { skip '$ENV{TEST_DEPENDENTS} not set', scalar @modules unless $ENV{TEST_DEPENDENTS}; test_modules(@modules); } done_testing(); PK � �[lO�i i author/mojibake.tnu �[��� #!perl use strict; use warnings qw(all); use Test::More; use Test::Mojibake; all_files_encoding_ok(); PK � �[ � � � author/pod-coverage.tnu �[��� #!perl # This file was automatically generated by Dist::Zilla::Plugin::PodCoverageTests. use Test::Pod::Coverage 1.08; use Pod::Coverage::TrustPod; all_pod_coverage_ok({ coverage_class => 'Pod::Coverage::TrustPod' }); PK � �[� �]� � author/pod-syntax.tnu �[��� #!perl # This file was automatically generated by Dist::Zilla::Plugin::PodSyntaxTests. use strict; use warnings; use Test::More; use Test::Pod 1.41; all_pod_files_ok(); PK � �[�:Q�z z author/distmeta.tnu �[��� #!perl # This file was automatically generated by Dist::Zilla::Plugin::MetaTests. use Test::CPAN::Meta; meta_yaml_ok(); PK � �[�9�~� � author/test-version.tnu �[��� use strict; use warnings; use Test::More; # generated by Dist::Zilla::Plugin::Test::Version 1.09 use Test::Version; my @imports = qw( version_all_ok ); my $params = { is_strict => 0, has_version => 1, multiple => 0, }; push @imports, $params if version->parse( $Test::Version::VERSION ) >= version->parse('1.002'); Test::Version->import(@imports); version_all_ok; done_testing; PK � �[�c�a� � author/00-compile.tnu �[��� use 5.006; use strict; use warnings; # this test was generated with Dist::Zilla::Plugin::Test::Compile 2.056 use Test::More; plan tests => 2; my @module_files = ( 'Sub/Uplevel.pm' ); # fake home for cpan-testers use File::Temp; local $ENV{HOME} = File::Temp::tempdir( CLEANUP => 1 ); my @switches = ( -d 'blib' ? '-Mblib' : '-Ilib', ); use File::Spec; use IPC::Open3; use IO::Handle; open my $stdin, '<', File::Spec->devnull or die "can't open devnull: $!"; my @warnings; for my $lib (@module_files) { # see L<perlfaq8/How can I capture STDERR from an external command?> my $stderr = IO::Handle->new; diag('Running: ', join(', ', map { my $str = $_; $str =~ s/'/\\'/g; q{'} . $str . q{'} } $^X, @switches, '-e', "require q[$lib]")) if $ENV{PERL_COMPILE_TEST_DEBUG}; my $pid = open3($stdin, '>&STDERR', $stderr, $^X, @switches, '-e', "require q[$lib]"); binmode $stderr, ':crlf' if $^O eq 'MSWin32'; my @_warnings = <$stderr>; waitpid($pid, 0); is($?, 0, "$lib loaded ok"); shift @_warnings if @_warnings and $_warnings[0] =~ /^Using .*\bblib/ and not eval { require blib; blib->VERSION('1.01') }; if (@_warnings) { warn @_warnings; push @warnings, @_warnings; } } is(scalar(@warnings), 0, 'no warnings found') or diag 'got warnings: ', ( Test::More->can('explain') ? Test::More::explain(\@warnings) : join("\n", '', @warnings) ); PK � �[ +�� � author/portability.tnu �[��� use strict; use warnings; use Test::More; eval 'use Test::Portability::Files'; plan skip_all => 'Test::Portability::Files required for testing portability' if $@; options(test_one_dot => 0); run_tests(); PK � �[&- 8� � author/pod-spell.tnu �[��� use strict; use warnings; use Test::More; # generated by Dist::Zilla::Plugin::Test::PodSpelling 2.007004 use Test::Spelling 0.12; use Pod::Wordlist; add_stopwords(<DATA>); all_pod_files_spelling_ok( qw( bin lib ) ); __DATA__ Adam Alexandr Ciornii David Golden Graham Gray Kennedy Koston Michael Nick Ollis PadWalker Schwern Sub Tcl's Uplevel Welch adamk alexchorny and dagolden lib mg13 mschwern nick plicease uplevel xdg PK � �[ھ�Xj j author/minimum-version.tnu �[��� use strict; use warnings; use Test::More; use Test::MinimumVersion; all_minimum_version_ok( qq{5.010} ); PK � �[&�%6Z Z author/eol.tnu �[��� use strict; use warnings; # this test was generated with Dist::Zilla::Plugin::Test::EOL 0.19 use Test::More 0.88; use Test::EOL; my @files = ( 'lib/HTTP/Date.pm', 't/00-compile.t', 't/00-report-prereqs.dd', 't/00-report-prereqs.t', 't/date.t' ); eol_unix_ok($_, { trailing_whitespace => 1 }) foreach @files; done_testing; PK � �[Gm�A A release/changes_has_content.tnu �[��� use Test::More tests => 2; note 'Checking Changes'; my $changes_file = 'Changes'; my $newver = '0.017'; my $trial_token = '-TRIAL'; my $encoding = 'UTF-8'; SKIP: { ok(-e $changes_file, "$changes_file file exists") or skip 'Changes is missing', 1; ok(_get_changes($newver), "$changes_file has content for $newver"); } done_testing; sub _get_changes { my $newver = shift; # parse changelog to find commit message open(my $fh, '<', $changes_file) or die "cannot open $changes_file: $!"; my $changelog = join('', <$fh>); if ($encoding) { require Encode; $changelog = Encode::decode($encoding, $changelog, Encode::FB_CROAK()); } close $fh; my @content = grep { /^$newver(?:$trial_token)?(?:\s+|$)/ ... /^\S/ } # from newver to un-indented split /\n/, $changelog; shift @content; # drop the version line # drop unindented last line and trailing blank lines pop @content while ( @content && $content[-1] =~ /^(?:\S|\s*$)/ ); # return number of non-blank lines return scalar @content; } PK � �[�]��� � release/cpan-changes.tnu �[��� use strict; use warnings; # this test was generated with Dist::Zilla::Plugin::Test::CPAN::Changes 0.012 use Test::More 0.96 tests => 1; use Test::CPAN::Changes; subtest 'changes_ok' => sub { changes_file_ok('Changes'); }; PK � �[]ق�� � 05_valgrind.tnu �[��� #!perl use strict; use warnings; use Test::Valgrind; use Test::More; use Test::LeakTrace; no_leaks_ok { my $a = 1 + 1; }; done_testing; PK � �[g }" 03_pod-coverage.tnu �[��� #!perl -w use Test::More; eval q{use Test::Pod::Coverage 1.04}; plan skip_all => 'Test::Pod::Coverage 1.04 required for testing POD coverage' if $@; all_pod_coverage_ok({ also_private => [qw(unimport BUILD DEMOLISH export_fail not_leaked leaked_cmp_ok)], }); PK � �[��eg� � 02_pod.tnu �[��� #!perl -w use strict; use Test::More; eval q{use Test::Pod 1.14}; plan skip_all => 'Test::Pod 1.14 required for testing PODU' if $@; all_pod_files_ok(); PK � �[m<��" " 01_podspell.tnu �[��� #!perl -w use strict; use Test::More; eval q{ use Test::Spellunker}; plan skip_all => q{Test::Spellunker is not installed.} if $@; add_stopwords(map { split /[\s\:\-]/ } <DATA>); $ENV{LANG} = 'C'; all_pod_files_spelling_ok('lib'); __DATA__ Goro Fuji gfuji(at)cpan.org Test::LeakTrace PK � �[>��Ä � 04_synopsis.tnu �[��� #!perl use Test::More; eval "use Test::Synopsis"; plan skip_all => "Test::Synopsis required for testing" if $@; all_synopsis_ok(); PK � �[�}�� author/critic.tnu �[��� #!perl use strict; use warnings; use Test::More; use English qw(-no_match_vars); eval "use Test::Perl::Critic"; plan skip_all => 'Test::Perl::Critic required to criticise code' if $@; Test::Perl::Critic->import( -profile => "perlcritic.rc" ) if -e "perlcritic.rc"; all_critic_ok(); PK �[�:Q�z z release/distmeta.tnu �[��� #!perl # This file was automatically generated by Dist::Zilla::Plugin::MetaTests. use Test::CPAN::Meta; meta_yaml_ok(); PK �[��� � 02_perlcritic.tnu �Iw�� use strict; use Test::More; eval { require Test::Perl::Critic; Test::Perl::Critic->import( -profile => 'xt/perlcriticrc'); }; plan skip_all => "Test::Perl::Critic is not installed." if $@; all_critic_ok('lib'); PK �[�5T�3 3 perlcriticrcnu �Iw�� [TestingAndDebugging::ProhibitNoStrict] allow=refs PK /�[���v� � release/minimum-version.tnu �[��� #!perl use Test::More; eval "use Test::MinimumVersion"; plan skip_all => "Test::MinimumVersion required for testing minimum versions" if $@; all_minimum_version_ok( qq{5.010} ); PK � �[� � B B dependent-modules.tnu �[��� PK � �[lO�i i � author/mojibake.tnu �[��� PK � �[ � � � / author/pod-coverage.tnu �[��� PK � �[� �]� � P author/pod-syntax.tnu �[��� PK � �[�:Q�z z = author/distmeta.tnu �[��� PK � �[�9�~� � � author/test-version.tnu �[��� PK � �[�c�a� � � author/00-compile.tnu �[��� PK � �[ +�� � � author/portability.tnu �[��� PK � �[&- 8� � � author/pod-spell.tnu �[��� PK � �[ھ�Xj j � author/minimum-version.tnu �[��� PK � �[&�%6Z Z � author/eol.tnu �[��� PK � �[Gm�A A release/changes_has_content.tnu �[��� PK � �[�]��� � � release/cpan-changes.tnu �[��� PK � �[]ق�� � � 05_valgrind.tnu �[��� PK � �[g }" � 03_pod-coverage.tnu �[��� PK � �[��eg� � � 02_pod.tnu �[��� PK � �[m<��" " � 01_podspell.tnu �[��� PK � �[>��Ä � 04_synopsis.tnu �[��� PK � �[�}�� � author/critic.tnu �[��� PK �[�:Q�z z 4 release/distmeta.tnu �[��� PK �[��� � � 02_perlcritic.tnu �Iw�� PK �[�5T�3 3 perlcriticrcnu �Iw�� PK /�[���v� � y release/minimum-version.tnu �[��� PK W x!
| ver. 1.6 |
Github
|
.
| PHP 8.2.30 | ??????????? ?????????: 0 |
proxy
|
phpinfo
|
???????????