package TestGeoIP::basic;
use strict;
use warnings FATAL => 'all';
use Apache::Test;
use Apache::TestUtil;
use Apache2::Const -compile => 'OK';
use Apache2::RequestIO ();
sub handler {
my $r = shift;
plan $r, tests => 5;
eval{ require 5.006001;};
ok t_cmp($@, "", "require 5.00601");
ok t_cmp($ENV{MOD_PERL_API_VERSION}, 2, "require mod_perl2");
eval{ require Apache2::GeoIP;};
ok t_cmp($@, "", "require Apache2::GeoIP");
eval{ require Apache2::Geo::IP;};
ok t_cmp($@, "", "require Apache2::Geo::IP");
eval{ require Apache2::Geo::Mirror;};
ok t_cmp($@, "", "require Apache2::Geo::Mirror");
Apache2::Const::OK;
}
1;
__END__