my ($response,$array_of_responses) = whoisip_query($ip);

    foreach (sort keys(%{$response}) ){
        print "$_: $response->{$_}\n";
    }