=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libnet-server-coro-perl-1.3/lib/Net/Server/Coro.pm-149- if ($addr && defined $prop->{'reverse_lookups'}) { libnet-server-coro-perl-1.3/lib/Net/Server/Coro.pm:150: $prop->{peerhost} = Coro::Util::gethostbyaddr($addr, Socket::AF_INET); libnet-server-coro-perl-1.3/lib/Net/Server/Coro.pm-151- } ############################################## libnet-server-coro-perl-1.3/inc/Module/Install.pm-376-# Done in evals to avoid confusing Perl::MinimumVersion libnet-server-coro-perl-1.3/inc/Module/Install.pm:377:eval( $] >= 5.006 ? <<'END_NEW' : <<'END_OLD' ); die $@ if $@; libnet-server-coro-perl-1.3/inc/Module/Install.pm-378-sub _read { ############################################## libnet-server-coro-perl-1.3/inc/Module/Install.pm-414-# Done in evals to avoid confusing Perl::MinimumVersion libnet-server-coro-perl-1.3/inc/Module/Install.pm:415:eval( $] >= 5.006 ? <<'END_NEW' : <<'END_OLD' ); die $@ if $@; libnet-server-coro-perl-1.3/inc/Module/Install.pm-416-sub _write { ############################################## libnet-server-coro-perl-1.3/inc/Module/Install/Fetch.pm-84- return if exists $args{size} and -s $file != $args{size}; libnet-server-coro-perl-1.3/inc/Module/Install/Fetch.pm:85: system($args{run}) if exists $args{run}; libnet-server-coro-perl-1.3/inc/Module/Install/Fetch.pm-86- unlink($file) if $args{remove}; ############################################## libnet-server-coro-perl-1.3/inc/Module/Install/Makefile.pm-45-sub makemaker { libnet-server-coro-perl-1.3/inc/Module/Install/Makefile.pm:46: ( @_ < 2 or $makemaker >= eval($_[1]) ) ? $makemaker : 0 libnet-server-coro-perl-1.3/inc/Module/Install/Makefile.pm-47-}