diff --git a/Geo-IP-1.51.tar.gz b/Geo-IP-1.51.tar.gz
new file mode 100644
index 0000000000000000000000000000000000000000..75e5ece845e1c0afb20f800d0351c8471ff650ec
Binary files /dev/null and b/Geo-IP-1.51.tar.gz differ
diff --git a/perl-Geo-IP.spec b/perl-Geo-IP.spec
new file mode 100644
index 0000000000000000000000000000000000000000..6e72f9540b666c546d15e766edf7b95a69573987
--- /dev/null
+++ b/perl-Geo-IP.spec
@@ -0,0 +1,84 @@
+%global _empty_manifest_terminate_build 0
+Name:           perl-Geo-IP
+Version:        1.51
+Release:        1
+Summary:        Look up location and network information by IP Address
+License:        GPL+ or Artistic
+Group:          Development/Libraries
+URL:            http://search.cpan.org/dist/Geo-IP/
+Source0:        http://www.cpan.org/authors/id/M/MA/MAXMIND/Geo-IP-%{version}.tar.gz
+BuildRequires:  perl-generators
+BuildRequires:  perl(Exporter)
+BuildRequires:  perl(ExtUtils::MakeMaker)
+BuildRequires:  perl(File::Spec)
+BuildRequires:  perl(strict)
+BuildRequires:  perl(Test::More) >= 0.96
+BuildRequires:  perl(warnings)
+Requires:       perl(Exporter)
+Requires:       perl(strict)
+Requires:       perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version))
+%description
+This module uses the GeoIP Legacy 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 visitors, for credit card fraud detection, and for software export controls.
+%package help
+Summary : Look up location and network information by IP Address
+Provides: perl-Geo-IP-doc
+%description help
+This module uses the GeoIP Legacy 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.
+%prep
+%setup -q -n Geo-IP-%{version}
+%build
+export PERL_MM_OPT=""
+%{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="$RPM_OPT_FLAGS"
+make %{?_smp_mflags}
+
+%install
+export PERL_MM_OPT=""
+rm -rf $RPM_BUILD_ROOT
+
+make pure_install PERL_INSTALL_ROOT=$RPM_BUILD_ROOT
+
+find $RPM_BUILD_ROOT -type f -name .packlist -exec rm -f {} \;
+find $RPM_BUILD_ROOT -type f -name '*.bs' -size 0 -exec rm -f {} \;
+find $RPM_BUILD_ROOT -depth -type d -exec rmdir {} 2>/dev/null \;
+
+%{_fixperms} $RPM_BUILD_ROOT/*
+
+pushd %{buildroot}
+touch filelist.lst
+if [ -d usr/bin ];then
+    find usr/bin -type f -printf "/%h/%f\n" >> filelist.lst
+fi
+if [ -d usr/sbin ];then
+    find usr/bin -type f -printf "/%h/%f\n" >> filelist.lst
+fi
+if [ -d usr/lib64 ];then
+    find usr/lib64 -type f -printf "/%h/%f\n" >> filelist.lst
+fi
+if [ -d usr/lib ];then
+    find usr/lib -type f -printf "/%h/%f\n" >> filelist.lst
+fi
+popd
+mv %{buildroot}/filelist.lst .
+%check
+make test
+
+%clean
+rm -rf $RPM_BUILD_ROOT
+
+%files -f filelist.lst
+%defattr(-,root,root,-)
+%doc Changes CONTRIBUTING.md cpanfile dist.ini LICENSE META.json README.md
+%{perl_vendorarch}/auto/*
+%{perl_vendorarch}/Geo*
+%files help
+%{_mandir}/*
+
+%changelog
+* Sat Jun 19 2021 Perl_Bot <Perl_Bot@openeuler.org> 1.51-1
+- Specfile autogenerated by Perl_Bot
+* Mon Sep  8 2003 Dr. Peter Bieringer <pbieringer@aerasec.de> 1.21-1.AERAsec.1
+- Initial