Anyone using the Maxmind geoip lookup?

$bad_country_codes = Array('CN', 'JP', 'TW');

require_once("geoip.inc");

$gi = geoip_open("/usr/share/GeoIP/GeoIP.dat", GEOIP_STANDARD);
$cc = geoip_country_code_by_addr($gi, $_SERVER['REMOTE_ADDR']);
if(in_array($cc, $bad_country_codes)) {
        exit;
}

#!/usr/bin/perl
####################################
#geo_ip_no.cgi
#Specific geo target
#
#
#
#
####################################
use CGI::Carp qw/fatalsToBrowser/;
use CGI qw/:standard/;

$addr ="$ENV{'REMOTE_ADDR'}";
$browser = $ENV{'HTTP_USER_AGENT'};
$geoip_file =  "/usr/share/geo_ip/GeoIP.dat";

print "Content-type: text/html\n\n";

$qstring = "$ENV{'QUERY_STRING'}";
	if ($qstring =~ s/[^a-zA-Z0-9\_]//g) {print qq~HUH???~;       exit;}

	use Geo::IP;

			$gi = Geo::IP->open( $geoip_file,  GEOIP_STANDARD)||die"died opening";

						$country_code = $gi->country_code_by_addr($addr);


			if ($country_code !~/(AA|BB|CC|DD|EE)/i){
				
				#INSERT
				
				
				
				
}#end geo ip

else{
	exit;
}

<?php
include_once("geoip.inc");
include_once("geoipregionvars.php");

$gi = geoip_open("GeoIP.dat", GEOIP_STANDARD);
$record = geoip_record_by_addr($gi, "62.41.77.63");

$country_code = $record->country_code;
$state_code = $record->region;
$city_name = $record->city;

geoip_close($gi);
?>

Geolocation results for 62.41.77.63: 

*City:  
*Region:  
*Area Code: 0 
*DMA Code: 0 
*Country Name: Germany 
*Country Code: DE 
*Longitude: 9 
*Latitude: 51 
*Currency Code: EUR 
 Currency Symbol: ? 
 US$ Exchange Rate: 0.7354336098 
(US$ was used here as the base currency.)
(This can be changed for lookups.)

At todays rate, US$100 will cost you ?73.54

Some places you may wish to visit near : 

1:
	 Place: Gemünden an der Wohra
	 Country Code: DE
	 Region: Hesse
	 County: 
	 Latitude: 50.9666667
	 Longitude: 8.9666667
	 Distance (miles): 2.72
	 Distance (km): 4.38
	 Direction (degrees) 142.38
	 Direction (heading) SE
2:
	 Place: Allendorf bei Frankenau
	 Country Code: DE
	 Region: Hesse
	 County: 
	 Latitude: 51.0666667
	 Longitude: 8.9000000
	 Distance (miles): 6.33
	 Distance (km): 10.19
	 Direction (degrees) 45.22
	 Direction (heading) NE
3:
	 Place: Hatzbach
	 Country Code: DE
	 Region: Hesse
	 County: 
	 Latitude: 50.8833333
	 Longitude: 9.0166667
	 Distance (miles): 8.09
	 Distance (km): 13.02
	 Direction (degrees) 173.34
	 Direction (heading) S
4:
	 Place: Allendorf an der Landsburg
	 Country Code: DE
	 Region: Hesse
	 County: 
	 Latitude: 50.9500000
	 Longitude: 9.2166667
	 Distance (miles): 10.04
	 Distance (km): 16.16
	 Direction (degrees) 102.8
	 Direction (heading) ESE
5:
	 Place: Neustadt
	 Country Code: DE
	 Region: Hesse
	 County: 
	 Latitude: 50.8500000
	 Longitude: 9.1166667
	 Distance (miles): 11.54
	 Distance (km): 18.57
	 Direction (degrees) 146.31
	 Direction (heading) SSE