=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libmodule-signature-perl-0.87/inc/Module/Install/Fetch.pm-84- return if exists $args{size} and -s $file != $args{size}; libmodule-signature-perl-0.87/inc/Module/Install/Fetch.pm:85: system($args{run}) if exists $args{run}; libmodule-signature-perl-0.87/inc/Module/Install/Fetch.pm-86- unlink($file) if $args{remove}; ############################################## libmodule-signature-perl-0.87/inc/Module/Install/Makefile.pm-45-sub makemaker { libmodule-signature-perl-0.87/inc/Module/Install/Makefile.pm:46: ( @_ < 2 or $makemaker >= eval($_[1]) ) ? $makemaker : 0 libmodule-signature-perl-0.87/inc/Module/Install/Makefile.pm-47-} ############################################## libmodule-signature-perl-0.87/inc/Module/Install.pm-376-# Done in evals to avoid confusing Perl::MinimumVersion libmodule-signature-perl-0.87/inc/Module/Install.pm:377:eval( $] >= 5.006 ? <<'END_NEW' : <<'END_OLD' ); die $@ if $@; libmodule-signature-perl-0.87/inc/Module/Install.pm-378-sub _read { ############################################## libmodule-signature-perl-0.87/inc/Module/Install.pm-416-# Done in evals to avoid confusing Perl::MinimumVersion libmodule-signature-perl-0.87/inc/Module/Install.pm:417:eval( $] >= 5.006 ? <<'END_NEW' : <<'END_OLD' ); die $@ if $@; libmodule-signature-perl-0.87/inc/Module/Install.pm-418-sub _write { ############################################## libmodule-signature-perl-0.87/script/cpansign-52-my $cmd = $cmd{substr($op, 0, 1)}; libmodule-signature-perl-0.87/script/cpansign:53:(system("perldoc $0"), exit) if $cmd eq 'help'; libmodule-signature-perl-0.87/script/cpansign-54-my @args; ############################################## libmodule-signature-perl-0.87/lib/Module/Signature.pm-154- my $gpg = _which_gpg() or return; libmodule-signature-perl-0.87/lib/Module/Signature.pm:155: `$gpg --version` =~ /GnuPG.*?(\S+)\s*$/m or return; libmodule-signature-perl-0.87/lib/Module/Signature.pm-156- return $1; ############################################## libmodule-signature-perl-0.87/lib/Module/Signature.pm-235- for my $gpg_bin ('gpg', 'gpg2', 'gnupg', 'gnupg2') { libmodule-signature-perl-0.87/lib/Module/Signature.pm:236: my $version = `$gpg_bin --version 2>&1`; libmodule-signature-perl-0.87/lib/Module/Signature.pm-237- if( $version && $version =~ /GnuPG/ ) { ############################################## libmodule-signature-perl-0.87/lib/Module/Signature.pm-274- my $cmd = join ' ', @cmd; libmodule-signature-perl-0.87/lib/Module/Signature.pm:275: $output = `$cmd`; libmodule-signature-perl-0.87/lib/Module/Signature.pm-276- } ############################################## libmodule-signature-perl-0.87/lib/Module/Signature.pm-467- # WTF? libmodule-signature-perl-0.87/lib/Module/Signature.pm:468: my @verify = `$gpg --batch --verify $SIGNATURE`; libmodule-signature-perl-0.87/lib/Module/Signature.pm-469- while (@verify) { ############################################## libmodule-signature-perl-0.87/lib/Module/Signature.pm-480- my $keyserver = _keyserver($version); libmodule-signature-perl-0.87/lib/Module/Signature.pm:481: while (`$gpg --batch --keyserver=$keyserver --search-keys '$key_name'`) { libmodule-signature-perl-0.87/lib/Module/Signature.pm-482- if (/^\(\d+\)/) { ############################################## libmodule-signature-perl-0.87/Makefile.PL-82- next unless $gpg_path; libmodule-signature-perl-0.87/Makefile.PL:83: next unless `$gpg_bin --version` =~ /GnuPG/; libmodule-signature-perl-0.87/Makefile.PL:84: next unless defined `$gpg_bin --list-public-keys`; libmodule-signature-perl-0.87/Makefile.PL-85-