diff --git a/Unicode-EastAsianWidth-1.33.tar.gz b/Unicode-EastAsianWidth-1.33.tar.gz
new file mode 100644
index 0000000..e8ff3ab
Binary files /dev/null and b/Unicode-EastAsianWidth-1.33.tar.gz differ
diff --git a/perl-Unicode-EastAsianWidth-no-inc.patch b/perl-Unicode-EastAsianWidth-no-inc.patch
new file mode 100644
index 0000000..2f4ed3e
--- /dev/null
+++ b/perl-Unicode-EastAsianWidth-no-inc.patch
@@ -0,0 +1,20 @@
+diff -up Unicode-EastAsianWidth-1.33/MANIFEST.noinc Unicode-EastAsianWidth-1.33/MANIFEST
+--- Unicode-EastAsianWidth-1.33/MANIFEST.noinc	2014-07-08 15:01:40.252642471 -0400
++++ Unicode-EastAsianWidth-1.33/MANIFEST	2014-07-08 15:01:47.592600413 -0400
+@@ -1,16 +1,4 @@
+ Changes
+-inc/Module/Install.pm
+-inc/Module/Install/Base.pm
+-inc/Module/Install/Can.pm
+-inc/Module/Install/Fetch.pm
+-inc/Module/Install/GithubMeta.pm
+-inc/Module/Install/Makefile.pm
+-inc/Module/Install/Metadata.pm
+-inc/Module/Install/Package.pm
+-inc/Module/Install/Win32.pm
+-inc/Module/Install/WriteAll.pm
+-inc/Module/Package.pm
+-inc/Pod/Markdown.pm
+ lib/Unicode/EastAsianWidth.pm
+ Makefile.PL
+ MANIFEST			This list of files
diff --git a/perl-Unicode-EastAsianWidth.spec b/perl-Unicode-EastAsianWidth.spec
new file mode 100644
index 0000000..ee017c2
--- /dev/null
+++ b/perl-Unicode-EastAsianWidth.spec
@@ -0,0 +1,48 @@
+Name:           perl-Unicode-EastAsianWidth
+Version:        1.33
+Release:        15
+Summary:        East Asian Width properties
+License:        CC0
+URL:            https://metacpan.org/release/Unicode-EastAsianWidth
+Source0:        https://cpan.metacpan.org/authors/id/A/AU/AUDREYT/Unicode-EastAsianWidth-%{version}.tar.gz
+
+Patch0:         perl-Unicode-EastAsianWidth-no-inc.patch
+
+BuildArch:      noarch
+BuildRequires:  perl perl-generators perl-Exporter perl-ExtUtils-MakeMaker
+BuildRequires:  perl-Module-Package perl-Pod-Markdown perl-Module-Package-Au
+Requires:       perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version))
+
+%{?perl_default_filter}
+
+%description
+This module provide user-defined Unicode properties that deal with width
+status of East Asian characters, as specified in
+<http://www.unicode.org/unicode/reports/tr11/>.
+
+%prep
+%autosetup -n Unicode-EastAsianWidth-%{version} -p1
+rm -rf inc/*
+
+%build
+perl Makefile.PL INSTALLDIRS=vendor
+%make_build
+
+%install
+make pure_install DESTDIR=%{buildroot}
+find %{buildroot} -type f -name .packlist -exec rm -f {} ';'
+find %{buildroot} -type f -name '*.bs' -empty -exec rm -f {} ';'
+%{_fixperms} %{buildroot}
+
+%check
+make test
+
+%files
+%defattr(-,root,root)
+%doc Changes README
+%{perl_vendorlib}/Unicode/
+%{_mandir}/man3/*
+
+%changelog
+* Thu Dec 5 2019 openEuler Buildteam <buildteam@openeuler.org> - 1.33-15
+- Package init