diff --git a/Any-URI-Escape-0.01.tar.gz b/Any-URI-Escape-0.01.tar.gz
new file mode 100644
index 0000000..809ed45
Binary files /dev/null and b/Any-URI-Escape-0.01.tar.gz differ
diff --git a/perl-Any-URI-Escape.spec b/perl-Any-URI-Escape.spec
new file mode 100644
index 0000000..bbc250a
--- /dev/null
+++ b/perl-Any-URI-Escape.spec
@@ -0,0 +1,50 @@
+Name:           perl-Any-URI-Escape
+Version:        0.01
+Release:        19
+Summary:        Load URI::Escape::XS preferentially over URI::Escape
+License:        GPL+ or Artistic
+
+URL:            https://metacpan.org/release/Any-URI-Escape
+Source0:        Any-URI-Escape-%{version}.tar.gz
+
+BuildArch:      noarch
+BuildRequires:  perl-generators
+BuildRequires:  perl(base)
+BuildRequires:  perl(Exporter)
+BuildRequires:  perl(ExtUtils::MakeMaker)
+BuildRequires:  perl(Test::More)
+BuildRequires:  perl(URI::Escape)
+Requires:       perl(URI::Escape)
+Requires:       perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version))
+
+%{?perl_default_filter}
+
+%description
+URI::Escape is great, but URI::Escape::XS is faster. This module loads
+URI::Escape::XS and imports the two most common methods if XS is installed.
+
+%prep
+%setup -q -n Any-URI-Escape-%{version}
+
+%build
+%{__perl} Makefile.PL INSTALLDIRS=vendor
+make %{?_smp_mflags}
+
+%install
+make pure_install DESTDIR=$RPM_BUILD_ROOT
+
+find $RPM_BUILD_ROOT -type f -name .packlist -exec rm -f {} \;
+
+%{_fixperms} $RPM_BUILD_ROOT/*
+
+%check
+make test
+
+%files
+%doc Changes README
+%{perl_vendorlib}/Any*
+%{_mandir}/man3/*
+
+%changelog
+* Fri Aug 7 2020 weidong <weidong@uniontech.com> - 0.01-19
+- Initial release for OpenEuler