=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libnet-whois-raw-perl-2.43/lib/Net/Whois/Raw.pm-178- } libnet-whois-raw-perl-2.43/lib/Net/Whois/Raw.pm:179: elsif ((/OrgID:\s+(\w+)/ || /descr:\s+(\w+)/) && Net::Whois::Raw::Common::is_ipaddr($dom)) { libnet-whois-raw-perl-2.43/lib/Net/Whois/Raw.pm-180- my $val = $1; ############################################## libnet-whois-raw-perl-2.43/lib/Net/Whois/Raw.pm-185- } libnet-whois-raw-perl-2.43/lib/Net/Whois/Raw.pm:186: elsif (/^\s+Maintainer:\s+RIPE\b/ && Net::Whois::Raw::Common::is_ipaddr($dom)) { libnet-whois-raw-perl-2.43/lib/Net/Whois/Raw.pm-187- $newsrv = $Net::Whois::Raw::Data::servers{RIPE}; ############################################## libnet-whois-raw-perl-2.43/lib/Net/Whois/Raw/Common.pm-195- my $tld; libnet-whois-raw-perl-2.43/lib/Net/Whois/Raw/Common.pm:196: if ( is_ipaddr($dom) || is_ip6addr($dom) ) { libnet-whois-raw-perl-2.43/lib/Net/Whois/Raw/Common.pm-197- $tld = "IP"; ############################################## libnet-whois-raw-perl-2.43/t/01-local.t-21- libnet-whois-raw-perl-2.43/t/01-local.t:22:ok( Net::Whois::Raw::Common::is_ipaddr( '122.234.214.214' ), 'is_ipaddr' ); libnet-whois-raw-perl-2.43/t/01-local.t:23:ok( !Net::Whois::Raw::Common::is_ipaddr( 'a22.b34.214.214' ), 'is_ipaddr' ); libnet-whois-raw-perl-2.43/t/01-local.t-24- ############################################## libnet-whois-raw-perl-2.43/t/example-domains-load-balancing.pl-93- my $txt = whois( $domain ); libnet-whois-raw-perl-2.43/t/example-domains-load-balancing.pl:94: $::dbh->do ('delete from whois_connection where domain = ?', {}, $domain); libnet-whois-raw-perl-2.43/t/example-domains-load-balancing.pl-95- $domain =~ s/.NS$//i;