(Perl) ip2location.io GeoLocation API

See more Geolocation Examples

Demonstrates how to lookup Geolocation data for an IPv4 address using the ip2location.io GeoLocation API.

For more information, see https://www.ip2location.io/ip2location-documentation

Chilkat Perl Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux, Solaris

use chilkat();

# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

$http = chilkat::CkHttp->new();

# Note: This is not a real API key.  Replace with your own...
$http->SetUrlVar("api_key","2C312FBC9E667E5A0211F5152E5A1333");
$http->SetUrlVar("ip_address","8.8.8.8");

# Note: When first creating an ip2location.io account, make sure to at least subscribe to the free access.
# Otherwise your API key will not yet work..
$jsonStr = $http->quickGetStr("https://api.ip2location.io/?key={$api_key}&ip={$ip_address}&format=json");
if ($http->get_LastMethodSuccess() == 0) {
    print $http->lastErrorText() . "\r\n";
    exit;
}

$json = chilkat::CkJsonObject->new();
$json->put_EmitCompact(0);
$success = $json->Load($jsonStr);

print $json->emit() . "\r\n";

# Sample output:
# Use this online tool to generate parsing code from sample JSON: 
# Generate Parsing Code from JSON

# {
#   "ip": "8.8.8.8",
#   "country_code": "US",
#   "country_name": "United States of America",
#   "region_name": "California",
#   "city_name": "Mountain View",
#   "latitude": 37.405992,
#   "longitude": -122.078515,
#   "zip_code": "94043",
#   "time_zone": "-07:00",
#   "asn": "15169",
#   "as": "Google LLC",
#   "is_proxy": false
# }

$ip = $json->stringOf("ip");
$country_code = $json->stringOf("country_code");
$country_name = $json->stringOf("country_name");
$region_name = $json->stringOf("region_name");
$city_name = $json->stringOf("city_name");
$latitude = $json->stringOf("latitude");
$longitude = $json->stringOf("longitude");
$zip_code = $json->stringOf("zip_code");
$time_zone = $json->stringOf("time_zone");
$asn = $json->stringOf("asn");
$v_as = $json->stringOf("as");
$is_proxy = $json->BoolOf("is_proxy");