=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestBuild.pm-568- libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestBuild.pm:569: unless (CORE::system($cmd) == 0) { libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestBuild.pm-570- my $status = $? >> 8; ############################################## libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfig.pm-786- my $localhost_addr = pack('C4', 127, 0, 0, 1); libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfig.pm:787: gethostbyaddr($localhost_addr, Socket::AF_INET()) || 'localhost'; libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfig.pm-788-} ############################################## libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfigPHP.pm-614-{ libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfigPHP.pm:615: eval("\$pass = (\$this $operator \$that);"); libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfigPHP.pm-616- ############################################## libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestMB.pm-133- # Subclass Apache::TestConfigC, perhaps? libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestMB.pm:134: $self->do_system('Build.PL', $action); libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestMB.pm-135- chdir $start_dir; ############################################## libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestSSLCA.pm-215- libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestSSLCA.pm:216: unless (system($cmd) == 0) { libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestSSLCA.pm-217- my $status = $? >> 8; ############################################## libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestSSLCA.pm-425- next unless $file =~ /\.cr[tl]$/; libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestSSLCA.pm:426: chomp(my $hash = `openssl $type -noout -hash < $file`); libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestSSLCA.pm-427- next unless $hash; ############################################## libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestSSLCA.pm-578- return $1 if $version =~ /^\S+SSL (\S+)/; libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestSSLCA.pm:579: die "FATAL: unable to determine openssl version via `$openssl version` from: $version"; libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestSSLCA.pm-580-} ############################################## libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfigParse.pm-63- libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfigParse.pm:64: my $where = $spec_postamble{$directive} || 'preamble'; libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfigParse.pm-65- ############################################## libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfigParse.pm-347- if ($directive eq "Include" or $directive eq "IncludeOptional") { libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfigParse.pm:348: foreach my $include (glob($self->server_file_rel2abs($_))) { libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestConfigParse.pm-349- $self->inherit_config_file_or_directory($include); ############################################## libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestServer.pm-385- setsockopt(S, Socket::SOL_SOCKET(), libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestServer.pm:386: Socket::SO_REUSEADDR(), libapache2-mod-perl2-2.0.11/Apache-Test/lib/Apache/TestServer.pm-387- pack("l", 1)) || die "setsockopt: $!"; ############################################## libapache2-mod-perl2-2.0.11/Apache-Test/Makefile.PL-123- : "not found"; libapache2-mod-perl2-2.0.11/Apache-Test/Makefile.PL:124: my $vnum = eval(${"${pkg}::VERSION"}) || 0; libapache2-mod-perl2-2.0.11/Apache-Test/Makefile.PL-125- ############################################## libapache2-mod-perl2-2.0.11/docs/api/Apache2/compat.pod-71- libapache2-mod-perl2-2.0.11/docs/api/Apache2/compat.pod:72:As you can see in mod_perl 1.0 API local_addr() was returning a libapache2-mod-perl2-2.0.11/docs/api/Apache2/compat.pod-73-SOCKADDR_IN object (see the Socket perl manpage), in mod_perl 2.0 API ############################################## libapache2-mod-perl2-2.0.11/docs/api/Apache2/compat.pod-75-object, which is a totally different beast. If Apache2::compat libapache2-mod-perl2-2.0.11/docs/api/Apache2/compat.pod:76:overrides the function C<local_addr()> to be back-compatible with libapache2-mod-perl2-2.0.11/docs/api/Apache2/compat.pod-77-mod_perl 1.0 API. Any code that relies on this function to work as it libapache2-mod-perl2-2.0.11/docs/api/Apache2/compat.pod-78-should under mod_perl 2.0 will be broken. Therefore the solution is libapache2-mod-perl2-2.0.11/docs/api/Apache2/compat.pod:79:not to override C<local_addr()> by default. Instead a special API is libapache2-mod-perl2-2.0.11/docs/api/Apache2/compat.pod-80-provided which overrides colliding functions only when needed and ############################################## libapache2-mod-perl2-2.0.11/docs/api/Apache2/Connection.pod-41- # this connection's local and remote socket addresses libapache2-mod-perl2-2.0.11/docs/api/Apache2/Connection.pod:42: $local_sa = $c->local_addr(); libapache2-mod-perl2-2.0.11/docs/api/Apache2/Connection.pod:43: $remote_sa = $c->remote_addr(); libapache2-mod-perl2-2.0.11/docs/api/Apache2/Connection.pod-44- ############################################## libapache2-mod-perl2-2.0.11/docs/api/Apache2/Connection.pod-448- libapache2-mod-perl2-2.0.11/docs/api/Apache2/Connection.pod:449: $local_sa = $c->local_addr(); libapache2-mod-perl2-2.0.11/docs/api/Apache2/Connection.pod-450- ############################################## libapache2-mod-perl2-2.0.11/docs/api/Apache2/Connection.pod-618- libapache2-mod-perl2-2.0.11/docs/api/Apache2/Connection.pod:619: $remote_sa = $c->remote_addr(); libapache2-mod-perl2-2.0.11/docs/api/Apache2/Connection.pod-620- ############################################## libapache2-mod-perl2-2.0.11/docs/api/APR/SockAddr.pod-9- libapache2-mod-perl2-2.0.11/docs/api/APR/SockAddr.pod:10: use APR::SockAddr (); libapache2-mod-perl2-2.0.11/docs/api/APR/SockAddr.pod-11- ############################################## libapache2-mod-perl2-2.0.11/docs/api/APR/SockAddr.pod-65- libapache2-mod-perl2-2.0.11/docs/api/APR/SockAddr.pod:66: use APR::SockAddr (); libapache2-mod-perl2-2.0.11/docs/api/APR/SockAddr.pod-67- use Apache2::Connection (); ############################################## libapache2-mod-perl2-2.0.11/docs/os/win32/distinstall-177- my $comp = Safe->new(); libapache2-mod-perl2-2.0.11/docs/os/win32/distinstall:178: my $cksum = $comp->reval($eval); libapache2-mod-perl2-2.0.11/docs/os/win32/distinstall-179- if ($@) { ############################################## libapache2-mod-perl2-2.0.11/docs/os/win32/mpinstall-316- my $comp = Safe->new(); libapache2-mod-perl2-2.0.11/docs/os/win32/mpinstall:317: $cksum = $comp->reval($eval); libapache2-mod-perl2-2.0.11/docs/os/win32/mpinstall-318- if ($@) { ############################################## libapache2-mod-perl2-2.0.11/docs/user/troubleshooting/troubleshooting.pod-203- libapache2-mod-perl2-2.0.11/docs/user/troubleshooting/troubleshooting.pod:204: % ipcs -s | perl -ane '`ipcrm -s $F[1]`' libapache2-mod-perl2-2.0.11/docs/user/troubleshooting/troubleshooting.pod-205- ############################################## libapache2-mod-perl2-2.0.11/docs/user/troubleshooting/troubleshooting.pod-208- libapache2-mod-perl2-2.0.11/docs/user/troubleshooting/troubleshooting.pod:209: % ipcs -s | perl -ane '/^0x00000000/ && `ipcrm -s $F[1]`' libapache2-mod-perl2-2.0.11/docs/user/troubleshooting/troubleshooting.pod-210- ############################################## libapache2-mod-perl2-2.0.11/lib/Apache2/porting.pm-101- libapache2-mod-perl2-2.0.11/lib/Apache2/porting.pm:102: *CORE::GLOBAL::require = sub (*) { my_require($_[0])}; libapache2-mod-perl2-2.0.11/lib/Apache2/porting.pm-103-} ############################################## libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm-406- debug "Running $cmd"; libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm:407: system("$cd && $cmd") == 0 or die "httpd: $cmd failed"; libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm-408- } ############################################## libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm-411- debug "Running $cmd"; libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm:412: system("$cd && $cmd") == 0 or die "httpd: $cmd failed"; libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm-413- ############################################## libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm-418- debug "Building srclib in $srclib"; libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm:419: system("$cd && $cmd") == 0 or die "srclib: $cmd failed"; libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm-420-} ############################################## libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm-1315- my $httpd_version = $self->httpd_version; libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm:1316: chomp($incdir = `$apr_config_path --includedir`); libapache2-mod-perl2-2.0.11/lib/Apache2/Build.pm-1317- } ############################################## libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-29-my (%keywords,%style_keywords); libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm:30:for (qw(asm auto break case char continue default do double else enum libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-31- extern float for fortran goto if int long register return short ############################################## libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-41-} libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm:42:for (qw(inline const asm noreturn section libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-43- constructor destructor unused weak)) { ############################################## libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-203- chomp $mline; libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm:204: #print "sym: `$sym', args: `$args', mline: `$mline'\n"; libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-205- if (defined $args) { ############################################## libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-242- chomp $mline; libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm:243:#print STDERR "sym: `$sym', args: `$args', mline: `$mline'\n"; libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-244- if (defined $args) { ############################################## libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-785- if ($w =~ /^(struct|class|enum|union)$/) { libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm:786: $decl =~ /\G\s+\w+/g or die "`$w' is not followed by word in `$decl'"; libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-787- } ############################################## libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-821- pos $decl = $pos; libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm:822: die "Expecting parenth after identifier in `$decl'\nafter `", libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-823- substr($decl, 0, $pos), "'" ############################################## libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-861- if ($w =~ /^(struct|class|enum|union)$/) { libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm:862: $decl =~ /\G\s+\w+/g or die "`$w' is not followed by word in `$decl'"; libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-863- } ############################################## libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-895- pos $decl = $pos; libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm:896: die "Expecting parenth after identifier in `$decl'\nafter `", libapache2-mod-perl2-2.0.11/lib/ModPerl/CScan.pm-897- substr($decl, 0, $pos), "'" ############################################## libapache2-mod-perl2-2.0.11/lib/ModPerl/WrapXS.pm-302- $pool .= '(obj)'; libapache2-mod-perl2-2.0.11/lib/ModPerl/WrapXS.pm:303:# XXX: not sure where val=$default is coming from, but for now use libapache2-mod-perl2-2.0.11/lib/ModPerl/WrapXS.pm-304-# hardcoded (SV *)NULL ############################################## libapache2-mod-perl2-2.0.11/t/response/TestApache/read3.pm-28- $len = $r->read($data, 100, $where); libapache2-mod-perl2-2.0.11/t/response/TestApache/read3.pm:29: $where += $len; libapache2-mod-perl2-2.0.11/t/response/TestApache/read3.pm-30- } while ($len > 0); ############################################## libapache2-mod-perl2-2.0.11/t/response/TestAPR/ipsubnet.pm-13-use APR::IpSubnet (); libapache2-mod-perl2-2.0.11/t/response/TestAPR/ipsubnet.pm:14:use APR::SockAddr (); libapache2-mod-perl2-2.0.11/t/response/TestAPR/ipsubnet.pm-15- ############################################## libapache2-mod-perl2-2.0.11/t/response/TestAPR/sockaddr.pm-13-use Apache2::RequestRec (); libapache2-mod-perl2-2.0.11/t/response/TestAPR/sockaddr.pm:14:use APR::SockAddr (); libapache2-mod-perl2-2.0.11/t/response/TestAPR/sockaddr.pm-15- ############################################## libapache2-mod-perl2-2.0.11/t/response/TestModules/cgipost2.pm-20- libapache2-mod-perl2-2.0.11/t/response/TestModules/cgipost2.pm:21: $r->print(join ":", map { $cgi->param($_) } $cgi->param); libapache2-mod-perl2-2.0.11/t/response/TestModules/cgipost2.pm-22- ############################################## libapache2-mod-perl2-2.0.11/util/getdiff.pl-19- $o .= "\n"; libapache2-mod-perl2-2.0.11/util/getdiff.pl:20: $o .= `diff -u /dev/null $_` libapache2-mod-perl2-2.0.11/util/getdiff.pl-21-} ############################################## libapache2-mod-perl2-2.0.11/util/sizeof.pl-56- libapache2-mod-perl2-2.0.11/util/sizeof.pl:57: my $size = `$name`; libapache2-mod-perl2-2.0.11/util/sizeof.pl-58- ############################################## libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm-406- debug "Running $cmd"; libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm:407: system("$cd && $cmd") == 0 or die "httpd: $cmd failed"; libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm-408- } ############################################## libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm-411- debug "Running $cmd"; libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm:412: system("$cd && $cmd") == 0 or die "httpd: $cmd failed"; libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm-413- ############################################## libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm-418- debug "Building srclib in $srclib"; libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm:419: system("$cd && $cmd") == 0 or die "srclib: $cmd failed"; libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm-420-} ############################################## libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm-1311- my $httpd_version = $self->httpd_version; libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm:1312: chomp($incdir = `$apr_config_path --includedir`); libapache2-mod-perl2-2.0.11/.pc/avoid-db-linkage.patch/lib/Apache2/Build.pm-1313- } ############################################## libapache2-mod-perl2-2.0.11/.pc/030-apxs-no-prefix.patch/Apache-Test/lib/Apache/TestConfigParse.pm-63- libapache2-mod-perl2-2.0.11/.pc/030-apxs-no-prefix.patch/Apache-Test/lib/Apache/TestConfigParse.pm:64: my $where = $spec_postamble{$directive} || 'preamble'; libapache2-mod-perl2-2.0.11/.pc/030-apxs-no-prefix.patch/Apache-Test/lib/Apache/TestConfigParse.pm-65- ############################################## libapache2-mod-perl2-2.0.11/.pc/030-apxs-no-prefix.patch/Apache-Test/lib/Apache/TestConfigParse.pm-345- if ($directive eq "Include" or $directive eq "IncludeOptional") { libapache2-mod-perl2-2.0.11/.pc/030-apxs-no-prefix.patch/Apache-Test/lib/Apache/TestConfigParse.pm:346: foreach my $include (glob($self->server_file_rel2abs($_))) { libapache2-mod-perl2-2.0.11/.pc/030-apxs-no-prefix.patch/Apache-Test/lib/Apache/TestConfigParse.pm-347- $self->inherit_config_file_or_directory($include); ############################################## libapache2-mod-perl2-2.0.11/.pc/031-test-extra-args.patch/Makefile.PL-456- print "$cmd\n"; libapache2-mod-perl2-2.0.11/.pc/031-test-extra-args.patch/Makefile.PL:457: system($cmd) == 0 or exit(1); libapache2-mod-perl2-2.0.11/.pc/031-test-extra-args.patch/Makefile.PL-458-} ############################################## libapache2-mod-perl2-2.0.11/.pc/200_fix-pod-spelling-errors.patch/lib/Apache2/porting.pm-101- libapache2-mod-perl2-2.0.11/.pc/200_fix-pod-spelling-errors.patch/lib/Apache2/porting.pm:102: *CORE::GLOBAL::require = sub (*) { my_require($_[0])}; libapache2-mod-perl2-2.0.11/.pc/200_fix-pod-spelling-errors.patch/lib/Apache2/porting.pm-103-} ############################################## libapache2-mod-perl2-2.0.11/.pc/220_fix-bad-whatis-entry.patch/Apache-Test/lib/Apache/TestServer.pm-385- setsockopt(S, Socket::SOL_SOCKET(), libapache2-mod-perl2-2.0.11/.pc/220_fix-bad-whatis-entry.patch/Apache-Test/lib/Apache/TestServer.pm:386: Socket::SO_REUSEADDR(), libapache2-mod-perl2-2.0.11/.pc/220_fix-bad-whatis-entry.patch/Apache-Test/lib/Apache/TestServer.pm-387- pack("l", 1)) || die "setsockopt: $!"; ############################################## libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm-406- debug "Running $cmd"; libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm:407: system("$cd && $cmd") == 0 or die "httpd: $cmd failed"; libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm-408- } ############################################## libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm-411- debug "Running $cmd"; libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm:412: system("$cd && $cmd") == 0 or die "httpd: $cmd failed"; libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm-413- ############################################## libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm-418- debug "Building srclib in $srclib"; libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm:419: system("$cd && $cmd") == 0 or die "srclib: $cmd failed"; libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm-420-} ############################################## libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm-1313- my $httpd_version = $self->httpd_version; libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm:1314: chomp($incdir = `$apr_config_path --includedir`); libapache2-mod-perl2-2.0.11/.pc/honour-env-LDFLAGS.patch/lib/Apache2/Build.pm-1315- } ############################################## libapache2-mod-perl2-2.0.11/Makefile.PL-456- print "$cmd\n"; libapache2-mod-perl2-2.0.11/Makefile.PL:457: system($cmd) == 0 or exit(1); libapache2-mod-perl2-2.0.11/Makefile.PL-458-}