Hello Apu: > I tried to use NET::DNS but as I am just using a web hosting from > a company I am not able to use that module (they don't have it > installed). > > Any other idea (using unix....) #!/usr/bin/perl -w use strict; my ($name,$alias,$type,$net, at addrs) = gethostbyname("www.yahoo.com"); print qq[$name,$alias,$type,$net\n]; foreach my $addr (@addrs) { my @bytes = unpack('C4',$addr); printf " %s\n", join ".", @bytes; } --------------------------------------------------------------------- To unsubscribe, e-mail: tclug-list-unsubscribe at mn-linux.org For additional commands, e-mail: tclug-list-help at mn-linux.org