in reply to Help Dereferencing Net::Whois::IP

Taking the hash reference, turning it into a hash, and looping through the hash should do it, something like this: 
my ($response,$array_of_responses) = whoisip_query($ip);
my %hresponse = %{$response};
while (my ($key, $value) = each %hresponse) 
{
    print "value of $key is $value\n";
}

[download]

Does that help?
C.

Replies are listed 'Best First'.
Re^2: Help Dereferencing Net::Whois::IP
by Aristotle (Chancellor) on Jun 20, 2003 at 20:30 UTC
    You can avoid the temporary here: 
    my ($response,$array_of_responses) = whoisip_query($ip);
while (my ($key, $value) = each %$response) 
{
    print "value of $key is $value\n";
}

    [download]

    Makeshifts last the longest.

[reply]
[d/l]

In Section Seekers of Perl Wisdom