my $geoip_country = '';
my $geosth = $dbh->prepare("SELECT country_code FROM geoip WHERE ? << netblock LIMIT 1")
        or croak($dbh->errstr);
if(!$geosth->execute($host)) {
    $dbh->rollback; # Not a big problem, GEOIP is just for information anyway
} else {
    my $line = $geosth->fetchrow_hashref;
    if(defined($line->{country_code})) {
        $geoip_country = $line->{country_code};
    } else {
        $geoip_country = '??';
    }
    $dbh->rollback;
}