--- libgeo-ip-perl-1.27.orig/debian/control
+++ libgeo-ip-perl-1.27/debian/control
@@ -0,0 +1,27 @@
+Source: libgeo-ip-perl
+Section: perl
+Priority: optional
+Maintainer: Ken Neighbors <ken@nsds.com>
+Standards-Version: 3.6.1
+Build-Depends: debhelper (>= 4), perl (>= 5.6.0), libgeoip-dev
+
+Package: libgeo-ip-perl
+Architecture: any
+Depends: ${perl:Depends}, ${shlibs:Depends}
+Suggests: geoip-bin | geoiplite-update
+Description: Look up country by IP Address
+ This is MaxMind's GeoIP Perl API module.  It uses a file based
+ database.  This database simply contains IP blocks as keys, and
+ countries as values.  This database should be more complete and
+ accurate than reverse DNS lookups.
+ .
+ This module can be used to automatically select the geographically
+ closest mirror, to analyze your web server logs to determine the
+ countries of your visiters, for credit card fraud detection, and for
+ software export controls.
+ .
+ A copy of MaxMind's free country database is included in libgeoip1.
+ You may want to get a more recent version (using geoiplite-update) or
+ subscribe to their more accurate non-free database (and use
+ geoipupdate in geoip-bin).
+
--- libgeo-ip-perl-1.27.orig/debian/changelog
+++ libgeo-ip-perl-1.27/debian/changelog
@@ -0,0 +1,12 @@
+libgeo-ip-perl (1.27-0nsds2) stable; urgency=low
+
+  * Fix bug to get database_info to work.
+
+ -- Ken Neighbors <ken@nsds.com>  Mon, 15 May 2006 10:54:00 -0700
+
+libgeo-ip-perl (1.27-0nsds1) stable; urgency=low
+
+  * Initial Release.
+
+ -- Ken Neighbors <ken@nsds.com>  Thu, 11 May 2006 12:48:00 -0700
+
--- libgeo-ip-perl-1.27.orig/debian/compat
+++ libgeo-ip-perl-1.27/debian/compat
@@ -0,0 +1 @@
+4
--- libgeo-ip-perl-1.27.orig/debian/copyright
+++ libgeo-ip-perl-1.27/debian/copyright
@@ -0,0 +1,19 @@
+This package was debianized by Ken Neighbors <ken@nsds.com> on
+Thu, 11 May 2006 12:48:00 -0700.
+
+It was downloaded from CPAN.
+
+Upstream Author: T.J. Mather <tjmather@tjmather.com>
+
+Copyright:
+
+Copyright (c) 2005, MaxMind LLC
+
+All rights reserved. This package is free software; you can
+redistribute it and/or modify it under the same terms as Perl itself.
+
+Perl is distributed under your choice of the GNU General Public
+License or the Artistic License.  On Debian GNU/Linux systems, the
+complete text of the GNU General Public License can be found in
+`/usr/share/common-licenses/GPL' and the Artistic Licence in
+`/usr/share/common-licenses/Artistic'.
--- libgeo-ip-perl-1.27.orig/debian/rules
+++ libgeo-ip-perl-1.27/debian/rules
@@ -0,0 +1,99 @@
+#!/usr/bin/make -f
+# This debian/rules file is provided as a template for normal perl
+# packages. It was created by Marc Brockschmidt <marc@dch-faq.de> for
+# the Debian Perl Group (http://pkg-perl.alioth.debian.org/) but may
+# be used freely wherever it is useful.
+
+# Uncomment this to turn on verbose mode.
+#export DH_VERBOSE=1
+
+# If set to a true value then MakeMaker's prompt function will
+# always return the default without waiting for user input.
+export PERL_MM_USE_DEFAULT=1
+
+PACKAGE=$(shell dh_listpackages)
+
+ifndef PERL
+PERL = /usr/bin/perl
+endif
+
+TMP     =$(CURDIR)/debian/$(PACKAGE)
+
+# Allow disabling build optimation by setting noopt in
+# $DEB_BUILD_OPTIONS
+CFLAGS = -Wall
+ifneq (,$(findstring noopt,$(DEB_BUILD_OPTIONS)))
+        CFLAGS += -O0
+else
+        CFLAGS += -O2
+endif
+
+build: build-stamp
+build-stamp:
+	dh_testdir
+
+	# Add commands to compile the package here
+	for patch in debian/patches/*; do patch -p0 < $$patch; done
+	$(PERL) Makefile.PL INSTALLDIRS=vendor
+	$(MAKE) OPTIMIZE="$(CFLAGS)" LD_RUN_PATH=""
+
+	touch build-stamp
+
+clean:
+	dh_testdir
+	dh_testroot
+
+	# Add commands to clean up after the build process here
+	-$(MAKE) realclean
+
+	if [ -e build-stamp ]; then for patch in debian/patches/*; do patch -p0 -R < $$patch; done; fi
+	dh_clean build-stamp install-stamp
+
+install: build install-stamp
+install-stamp:
+	dh_testdir
+	dh_testroot
+	dh_clean -k
+
+	# Add commands to install the package into debian/$PACKAGE_NAME here
+	$(MAKE) test
+	$(MAKE) install DESTDIR=$(TMP) PREFIX=/usr
+
+	# As this is a architecture dependent package, we are not
+	# supposed to install stuff to /usr/share. MakeMaker creates
+	# the dirs, we delete them from the deb:
+	rmdir --ignore-fail-on-non-empty --parents $(TMP)/usr/share/perl5
+
+	touch install-stamp
+
+# Build architecture-independent files here.
+binary-indep: build install
+# We have nothing to do by default.
+
+# Build architecture-dependent files here.
+binary-arch: build install
+	dh_testdir
+	dh_testroot
+	dh_installdocs README
+	dh_installexamples 
+#	dh_installmenu
+#	dh_installcron
+#	dh_installman
+	dh_installchangelogs Changes
+	dh_link
+	dh_strip
+	dh_compress
+	dh_fixperms
+	dh_makeshlibs
+	dh_installdeb
+	dh_perl 
+	dh_shlibdeps
+	dh_gencontrol
+	dh_md5sums
+	dh_builddeb
+
+source diff:                                                                  
+	@echo >&2 'source and diff are obsolete - use dpkg-source -b'; false
+
+binary: binary-indep binary-arch
+.PHONY: build clean binary-indep binary-arch binary
--- libgeo-ip-perl-1.27.orig/debian/README.Debian
+++ libgeo-ip-perl-1.27/debian/README.Debian
@@ -0,0 +1,20 @@
+This is MaxMind's Geo::IP Perl module for accessing their databases.
+
+The country database, GeoIP.dat, is included in the libgeoip1 official
+Debian package.  You can get the latest version from:
+
+  http://www.maxmind.com/download/geoip/database/
+
+Decompress it and install it in this directory:
+
+  /usr/share/GeoIP/
+
+That database is the "free" version and they update it monthly.  For
+more information, see:
+
+  http://www.maxmind.com/app/geoip_country
+
+They also provide a free city database GeoLiteCity.dat, as well as
+more accurate licensed databases.
+
+ -- Ken Neighbors <ken@nsds.com>, Tue May 16 08:28:55 2006
--- libgeo-ip-perl-1.27.orig/debian/patches/database_info.patch
+++ libgeo-ip-perl-1.27/debian/patches/database_info.patch
@@ -0,0 +1,14 @@
+--- IP.xs.orig	2005-08-19 00:10:19.000000000 +0000
++++ IP.xs	2006-05-12 19:04:36.040202795 +0000
+@@ -65,10 +65,8 @@
+ 	RETVAL
+ 
+ char *
+-GeoIP_database_info (gi)
++database_info (gi)
+ 	GeoIP *gi
+-    PREINIT:
+-	int i = 0;  
+     CODE:
+ 	RETVAL = GeoIP_database_info(gi);
+     OUTPUT:
