=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== lookup-1.08b/server.info/network.pl-45- } elsif (defined($host)) { lookup-1.08b/server.info/network.pl:46: $to = &get_addr($host, $port); lookup-1.08b/server.info/network.pl-47- return qq/unknown address "$host"/ unless defined $to; ############################################## lookup-1.08b/server.info/network.pl-122- { lookup-1.08b/server.info/network.pl:123: local(@lookup) = `nslookup $host 2>&1`; lookup-1.08b/server.info/network.pl-124- if (@lookup) ############################################## lookup-1.08b/server.info/network.pl-140-## lookup-1.08b/server.info/network.pl:141:## my_addr() lookup-1.08b/server.info/network.pl-142-## Returns the packed socket address of the local host (port 0) ############################################## lookup-1.08b/server.info/network.pl-149- chop($_myhostname_ = `hostname`) if !defined $_myhostname_; lookup-1.08b/server.info/network.pl:150: $addr{'me'} = &get_addr($_myhostname_, 0); lookup-1.08b/server.info/network.pl-151-}