===========================================================
                                      .___ __  __   
          _________________  __ __  __| _/|__|/  |_ 
         / ___\_` __ \__  \ |  |  \/ __ | | \\_  __\
        / /_/  >  | \// __ \|  |  / /_/ | |  ||  |  
        \___  /|__|  (____  /____/\____ | |__||__|  
       /_____/            \/           \/           
              grep rough audit - static analysis tool
                  v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
libnet-dns-perl-1.29/contrib/check_soa-168-my @flag = map { "[-$_]" } split( //, $options );		# documentation
libnet-dns-perl-1.29/contrib/check_soa:169:die eval { system("perldoc -F $self"); "" }, <<END unless scalar @ARGV;
libnet-dns-perl-1.29/contrib/check_soa-170-	Synopsis:  $self @flag @arg
##############################################
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm-296-			my $packet = $defres->send( $ns, 'A' );
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm:297:			my @iplist = _cname_addr( $packet, $names );
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm-298-
##############################################
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm-300-				$packet = $defres->send( $ns, 'AAAA' );
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm:301:				push @iplist, _cname_addr( $packet, $names );
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm-302-			}
##############################################
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm-496-			unless ( ref $ns ) {
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm:497:				my $dst_sockaddr = $self->_create_dst_sockaddr( $ns, $port );
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm-498-				my $socket = $self->_create_udp_socket($ns) || next;
##############################################
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm-599-	foreach my $ip ( $self->nameservers ) {
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm:600:		my $sockaddr = $self->_create_dst_sockaddr( $ip, $port );
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/Base.pm-601-		my $socket = $self->_create_udp_socket($ip) || next;
##############################################
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/android.pm-31-	for ( 1 .. 4 ) {
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/android.pm:32:		my $ret = `getprop net.dns$_` || next;
libnet-dns-perl-1.29/lib/Net/DNS/Resolver/android.pm-33-		chomp $ret;
##############################################
libnet-dns-perl-1.29/lib/Net/DNS/Resolver.pm-482-
libnet-dns-perl-1.29/lib/Net/DNS/Resolver.pm:483:    $resolver->srcaddr('2001::DB8::1');
libnet-dns-perl-1.29/lib/Net/DNS/Resolver.pm-484-
##############################################
libnet-dns-perl-1.29/lib/Net/DNS/Question.pm-72-	if ( defined $qname and $qname =~ m/:|\d$/ ) {
libnet-dns-perl-1.29/lib/Net/DNS/Question.pm:73:		if ( my $reverse = _dns_addr($qname) ) {
libnet-dns-perl-1.29/lib/Net/DNS/Question.pm-74-			$qname = $reverse;
##############################################
libnet-dns-perl-1.29/lib/Net/DNS/Question.pm-286-	my $rhs = $1 || '0';
libnet-dns-perl-1.29/lib/Net/DNS/Question.pm:287:	return _dns_addr($rhs) if m#^[:0]*:0*:[fF]{4}:[^:]+$#;	# IPv4
libnet-dns-perl-1.29/lib/Net/DNS/Question.pm-288-	$rhs = sprintf '%x%0.2x:%x%0.2x', map { $_ || 0 } split( /\./, $rhs, 4 ) if /\./;
##############################################
libnet-dns-perl-1.29/lib/Net/DNS/Nameserver.pm-97-
libnet-dns-perl-1.29/lib/Net/DNS/Nameserver.pm:98:	foreach my $addr (@localaddresses) {
libnet-dns-perl-1.29/lib/Net/DNS/Nameserver.pm-99-
##############################################
libnet-dns-perl-1.29/lib/Net/DNS/RR.pm-782-	my $module = join '::', __PACKAGE__, $self->type;
libnet-dns-perl-1.29/lib/Net/DNS/RR.pm:783:	eval("require $module") if $oref eq __PACKAGE__;	## no critic ProhibitStringyEval
libnet-dns-perl-1.29/lib/Net/DNS/RR.pm-784-
##############################################
libnet-dns-perl-1.29/t/01-resolver-config.t-95-	foreach my $ip (qw(127.0.0.1 ::1)) {
libnet-dns-perl-1.29/t/01-resolver-config.t:96:		is( $resolver->srcaddr($ip), $ip, "\$resolver->srcaddr($ip)" );
libnet-dns-perl-1.29/t/01-resolver-config.t-97-	}
##############################################
libnet-dns-perl-1.29/t/01-resolver.t-64-
libnet-dns-perl-1.29/t/01-resolver.t:65:is( scalar( Net::DNS::Resolver::Base::_cname_addr( undef, undef ) ), 0, '_cname_addr()	no reply packet' );
libnet-dns-perl-1.29/t/01-resolver.t-66-