When iam using this code
use Net::DNS::Resolver;
my $res = Net::DNS::Resolver->new();
my $packet = $res->search('www.indiaimage.nic.in', 'HINFO');
my ($rr) = $packet->answer();
print "cpu = ", $rr->cpu, " os = ", $rr->os, "\n";
Iam getting error:
Can't call method "answer" on an undefined value at hinfo.pl line 4.
My requiement is that If i give any hostname i have to get
remote O.S. used by that host.