=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libmodule-install-perl-1.19/Makefile.PL-104-# pod2text is in https://metacpan.org/release/podlators libmodule-install-perl-1.19/Makefile.PL:105:system("pod2text $readme_from > README") libmodule-install-perl-1.19/Makefile.PL-106- if -f '.gitignore' and (not -e 'README' or (stat('README'))[9] < (stat($readme_from))[9]); ############################################## libmodule-install-perl-1.19/lib/Module/Install/Admin/Bundle.pm-48- libmodule-install-perl-1.19/lib/Module/Install/Admin/Bundle.pm:49: my $where = $mod->fetch( fetchdir => $bundle_dir, ); libmodule-install-perl-1.19/lib/Module/Install/Admin/Bundle.pm-50- unless ($where) { ############################################## libmodule-install-perl-1.19/lib/Module/Install/Admin/Include.pm-28- foreach my $key ( sort keys %$deps ) { libmodule-install-perl-1.19/lib/Module/Install/Admin/Include.pm:29: $self->include($key); libmodule-install-perl-1.19/lib/Module/Install/Admin/Include.pm-30- } ############################################## libmodule-install-perl-1.19/lib/Module/Install/Admin/Include.pm-40- ) { libmodule-install-perl-1.19/lib/Module/Install/Admin/Include.pm:41: $self->include($module); libmodule-install-perl-1.19/lib/Module/Install/Admin/Include.pm-42- } ############################################## libmodule-install-perl-1.19/lib/Module/Install/Fetch.pm-83- return if exists $args{size} and -s $file != $args{size}; libmodule-install-perl-1.19/lib/Module/Install/Fetch.pm:84: system($args{run}) if exists $args{run}; libmodule-install-perl-1.19/lib/Module/Install/Fetch.pm-85- unlink($file) if $args{remove}; ############################################## libmodule-install-perl-1.19/lib/Module/Install/Makefile.pm-44-sub makemaker { libmodule-install-perl-1.19/lib/Module/Install/Makefile.pm:45: ( @_ < 2 or $makemaker >= eval($_[1]) ) ? $makemaker : 0 libmodule-install-perl-1.19/lib/Module/Install/Makefile.pm-46-} ############################################## libmodule-install-perl-1.19/lib/Module/Install/PAR.pm-207- } elsif ( $self->can_run('unzip') ) { libmodule-install-perl-1.19/lib/Module/Install/PAR.pm:208: return if system( unzip => $file, qw(-d blib) ); libmodule-install-perl-1.19/lib/Module/Install/PAR.pm-209- } ############################################## libmodule-install-perl-1.19/lib/Module/Install/Share.pm-50- my $postamble = ''; libmodule-install-perl-1.19/lib/Module/Install/Share.pm:51: my $perm_dir = eval($ExtUtils::MakeMaker::VERSION) >= 6.52 ? '$(PERM_DIR)' : 755; libmodule-install-perl-1.19/lib/Module/Install/Share.pm-52- File::Find::find({ ############################################## libmodule-install-perl-1.19/t/12_eumm_params.t-32- ok( $content =~ s/^.*\$PREREQ_PM = \{/\$PREREQ_PM = {/s,'PREREQ_PM found'); libmodule-install-perl-1.19/t/12_eumm_params.t:33: eval ($content); libmodule-install-perl-1.19/t/12_eumm_params.t-34- ok( !$@,'correct content'); libmodule-install-perl-1.19/t/12_eumm_params.t-35- ok( exists $PREREQ_PM->{'File::Spec'}); libmodule-install-perl-1.19/t/12_eumm_params.t:36: if ( eval($ExtUtils::MakeMaker::VERSION) < 6.55_03 ) { libmodule-install-perl-1.19/t/12_eumm_params.t-37- ok( exists $PREREQ_PM->{'ExtUtils::MakeMaker'}); ############################################## libmodule-install-perl-1.19/t/17_sign.t-12- libmodule-install-perl-1.19/t/17_sign.t:13:plan skip_all => 'test requires ExtUtils::MakeMaker >= 6.17' if eval($ExtUtils::MakeMaker::VERSION) < 6.17; libmodule-install-perl-1.19/t/17_sign.t-14- ############################################## libmodule-install-perl-1.19/t/17_sign.t-56- libmodule-install-perl-1.19/t/17_sign.t:57: # XXX: might be better test `$Config{make} distsign` here libmodule-install-perl-1.19/t/17_sign.t-58- # but it's neither safe nor portable... ############################################## libmodule-install-perl-1.19/t/25_perl_version_from.t-44-SKIP: { libmodule-install-perl-1.19/t/25_perl_version_from.t:45: skip 'requires ExtUtils::MakeMaker > 6.48', 1 if eval($ExtUtils::MakeMaker::VERSION) < 6.48; libmodule-install-perl-1.19/t/25_perl_version_from.t-46- ok($content =~ /#\s*MIN_PERL_VERSION => q\[5\.005\]/, 'has perl_version'); ############################################## libmodule-install-perl-1.19/t/29_requires_from.t-30- ok( $content =~ s/^.*\$PREREQ_PM = \{/\$PREREQ_PM = {/s,'PREREQ_PM found'); libmodule-install-perl-1.19/t/29_requires_from.t:31: eval ($content); libmodule-install-perl-1.19/t/29_requires_from.t-32- ok( !$@,'correct content'); ############################################## libmodule-install-perl-1.19/t/29_requires_from.t-61- ok( $content =~ s/^.*\$PREREQ_PM = \{/\$PREREQ_PM = {/s,'PREREQ_PM found'); libmodule-install-perl-1.19/t/29_requires_from.t:62: eval ($content); libmodule-install-perl-1.19/t/29_requires_from.t-63- ok( !$@,'correct content'); libmodule-install-perl-1.19/t/29_requires_from.t:64: if ( eval($ExtUtils::MakeMaker::VERSION) < 6.55_03 ) { libmodule-install-perl-1.19/t/29_requires_from.t-65- ok( exists $PREREQ_PM->{'File::Spec'}); ############################################## libmodule-install-perl-1.19/t/lib/MyTest.pm-32-# Done in evals to avoid confusing Perl::MinimumVersion libmodule-install-perl-1.19/t/lib/MyTest.pm:33:eval( $] >= 5.006 ? <<'END_NEW' : <<'END_OLD' ); die $@ if $@; libmodule-install-perl-1.19/t/lib/MyTest.pm-34-sub _read { ############################################## libmodule-install-perl-1.19/t/lib/MyTest.pm-173- my @run_params=@{ $params{run_params} || [] }; libmodule-install-perl-1.19/t/lib/MyTest.pm:174: my $ret = system($^X, "-I../../lib", "-I../../blib/lib", "Makefile.PL",@run_params); libmodule-install-perl-1.19/t/lib/MyTest.pm-175- chdir $home or return 0; ############################################## libmodule-install-perl-1.19/t/lib/MyTest.pm-188- my $run_params=join(' ',@{ $params{run_params} || [] }); libmodule-install-perl-1.19/t/lib/MyTest.pm:189: my $ret = system("$^X -I../../lib -I../../blib/lib Makefile.PL $run_params"); libmodule-install-perl-1.19/t/lib/MyTest.pm-190- #my $result=qx(); ############################################## libmodule-install-perl-1.19/t/lib/MyTest.pm-231- my $command = join ' ', $^X, "-I../../lib", "-I../../blib/lib", "Makefile.PL", @run_params; libmodule-install-perl-1.19/t/lib/MyTest.pm:232: my $ret = `$command 2>&1`; libmodule-install-perl-1.19/t/lib/MyTest.pm-233- chdir $home; ############################################## libmodule-install-perl-1.19/t/lib/MyTest.pm-261- my $ret = supports_capture() libmodule-install-perl-1.19/t/lib/MyTest.pm:262: ? `$make $target 2>&1` libmodule-install-perl-1.19/t/lib/MyTest.pm:263: : `$make $target`; libmodule-install-perl-1.19/t/lib/MyTest.pm-264- chdir $home;