=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== pmtools-2.2.0/bin/pmls-21- if ( $^O eq "MSWin32" ) { pmtools-2.2.0/bin/pmls:22: my $path = `$^X -S $Bin/pmpath $module`; pmtools-2.2.0/bin/pmls-23- $path =~ s/\//\\/g; ############################################## pmtools-2.2.0/bin/pmls-25- } else { pmtools-2.2.0/bin/pmls:26: system "ls -l " . `$^X -S $Bin/pmpath $module`; pmtools-2.2.0/bin/pmls-27- } ############################################## pmtools-2.2.0/bin/pmcat-22- pmtools-2.2.0/bin/pmcat:23:exec "$pager `$^X -S $Bin/pmpath @ARGV`"; pmtools-2.2.0/bin/pmcat-24- ############################################## pmtools-2.2.0/bin/stdpods-14- pmtools-2.2.0/bin/stdpods:15:system("$^X -S $Bin/basepods"); pmtools-2.2.0/bin/stdpods-16-open(PROG, "$^X -S $Bin/modpods |") || die "can't fork: $!"; ############################################## pmtools-2.2.0/bin/podpath-12- if ( $module =~ /^perl/ ) { pmtools-2.2.0/bin/podpath:13: system("$^X -S stdpods | grep $module"); pmtools-2.2.0/bin/podpath-14- } else { ############################################## pmtools-2.2.0/bin/podpath-21- # in case we find the .pm before the .pod pmtools-2.2.0/bin/podpath:22: my $output = `grep '=head1' $pod_file`; pmtools-2.2.0/bin/podpath-23- if ($? == 0) { ############################################## pmtools-2.2.0/bin/pmdesc-26- if ($use_pod) { pmtools-2.2.0/bin/pmdesc:27: $fullpath = `$^X $Bin/podpath $module`; pmtools-2.2.0/bin/pmdesc-28- } else { pmtools-2.2.0/bin/pmdesc:29: $fullpath = `$^X $Bin/pmpath $module`; pmtools-2.2.0/bin/pmdesc-30- } ############################################## pmtools-2.2.0/bin/pmdesc-69- if ( $^O eq "MSWin32" ) { pmtools-2.2.0/bin/pmdesc:70: $vers = `$^X -S $Bin/pmvers $module 2>NUL`; pmtools-2.2.0/bin/pmdesc-71- } else { pmtools-2.2.0/bin/pmdesc:72: $vers = `$^X -S $Bin/pmvers $module 2>/dev/null`; pmtools-2.2.0/bin/pmdesc-73- } ############################################## pmtools-2.2.0/bin/pmdesc-100- pmtools-2.2.0/bin/pmdesc:101: $ pmdesc `pminst -s | perl -lane 'print $F[1] if $F[0] =~ /site/'` pmtools-2.2.0/bin/pmdesc-102- XML::Parser::Expat (2.19) - Lowlevel access to James Clark's expat XML parser ############################################## pmtools-2.2.0/bin/pmfunc-30- pmtools-2.2.0/bin/pmfunc:31: $file = `$^X -S $Bin/pmpath $module`; pmtools-2.2.0/bin/pmfunc-32- if ($?) { ############################################## pmtools-2.2.0/bin/pmall-125- my $mod = shift; pmtools-2.2.0/bin/pmall:126: my $vers = `$^X -m$mod -e 'print \$${mod}::VERSION' 2>&1`; pmtools-2.2.0/bin/pmall:127: #my $vers = `$^X -m$mod -e 'print \$${mod}::VERSION' 2>/dev/null`; pmtools-2.2.0/bin/pmall-128- # 2> due to errors from MM_Unix etc ############################################## pmtools-2.2.0/bin/pmall-206- pmtools-2.2.0/bin/pmall:207: $ pmdesc `pminst -s | perl -lane 'print $F[1] if $F[0] =~ /site/'` pmtools-2.2.0/bin/pmall-208- XML::Parser::Expat (2.19) - Lowlevel access to James Clark's expat XML parser ############################################## pmtools-2.2.0/bin/pfcat-21- pmtools-2.2.0/bin/pfcat:22:system "$^X -S podgrep -h @options '@ARGV' `$^X -S podpath perlfunc`"; pmtools-2.2.0/bin/pfcat-23-exit ($? != 0); ############################################## pmtools-2.2.0/.pc/spelling.patch/bin/pfcat-21- pmtools-2.2.0/.pc/spelling.patch/bin/pfcat:22:system "$^X -S podgrep -h @options '@ARGV' `$^X -S podpath perlfunc`"; pmtools-2.2.0/.pc/spelling.patch/bin/pfcat-23-exit ($? != 0);