NAME Apache::Geo::IP - Look up country by IP Address SYNOPSIS # in httpd.conf # PerlModule Apache::HelloIP # # SetHandler perl-script # PerlHandler Apache::HelloIP # PerlSetVar GeoIPDBFile "/usr/local/share/geoip/GeoIP.dat" # PerlSetVar GeoIPFlag Standard # # file Apache::HelloIP use Apache::Geo::IP; use strict; use Apache::Constants qw(OK); sub handler { my $r = Apache::Geo::IP->new(shift); $r->content_type('text/plain'); my $country = uc($r->country_code_by_addr()); $r->print($country); return OK; } DESCRIPTION This module constitutes a mod_perl (both versions 1 and 2) interface to the Geo::IP and Geo::Mirror modules. Geo::IP is used to look up in a database a country of origin of an IP address, while Geo::Mirror is used to select a mirror by country from a specified list. See the documentation for Apache::Geo::IP and Apache::Geo::Mirror for more details. The included tests require Apache::Test, which can be obtained in the mod_perl-2 sources or in the httpd-test distribution. These tests need a network connection to run; some may fail due to timeouts upon doing certain name lookups. The mod_perl-2 modules included here, with prefix Apache2::*, will only work with mod_perl-1.999022 and above (RC5 or greater of the CPAN distribution). PPM PACKAGE A Win32 ppm package, suitable for use with ActivePerl compatible Perl packages, is available at http://theoryx5.uwinnipeg.ca/ppmpackages/ for ActivePerl 6xx and at http://theoryx5.uwinnipeg.ca/ppms/ for ActivePerl 8xx. To install, within the ppm shell set the repository to http://theoryx5.uwinnipeg.ca/cgi-bin/ppmserver?urn:/PPMServer for ActivePerl 6xx and to http://theoryx5.uwinnipeg.ca/cgi-bin/ppmserver?urn:/PPMServer58 for ActivePerl 8xx, and then ppm> install Apache-GeoIP AUTHOR The look-up code for associating a country with an IP address is based on the GeoIP library and the Geo::IP Perl module, and is Copyright (c) 2002, T.J. Mather, tjmather@tjmather.com, New York, NY, USA. See http://www.maxmind.com/ for details. The mod_perl interface is Copyright (c) 2002, Randy Kobes . All rights reserved. This package is free software; you can redistribute it and/or modify it under the same terms as Perl itself.