diff --git a/Pod-Coverage-0.23-Do-not-search-.-lib-by-pod_cover.patch b/Pod-Coverage-0.23-Do-not-search-.-lib-by-pod_cover.patch
new file mode 100644
index 0000000..20d69f9
--- /dev/null
+++ b/Pod-Coverage-0.23-Do-not-search-.-lib-by-pod_cover.patch
@@ -0,0 +1,25 @@
+From 273067dbd3e8bfc4b26849a4615c3f44f54e7029 Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
+Date: Wed, 22 May 2013 15:05:54 +0200
+Subject: [PATCH] Do not search ./lib by pod_cover
+
+<https://rt.cpan.org/Public/Bug/Display.html?id=85540>
+---
+ bin/pod_cover | 1 -
+ 1 file changed, 1 deletion(-)
+
+diff --git a/bin/pod_cover b/bin/pod_cover
+index c11b2ff..94ea7aa 100644
+--- a/bin/pod_cover
++++ b/bin/pod_cover
+@@ -3,7 +3,6 @@
+ # Run this to get a coverage analysis of the embedded documentation
+ 
+ use Pod::Coverage;
+-use lib 'lib';			# to test distribution inside './lib'
+ use strict;
+ 
+ print "Pod coverage analysis v1.00 (C) by Tels 2001.\n";
+-- 
+1.8.1.4
+
diff --git a/Pod-Coverage-0.23.tar.gz b/Pod-Coverage-0.23.tar.gz
new file mode 100644
index 0000000..6c5b065
Binary files /dev/null and b/Pod-Coverage-0.23.tar.gz differ
diff --git a/perl-Pod-Coverage.spec b/perl-Pod-Coverage.spec
new file mode 100644
index 0000000..36f0645
--- /dev/null
+++ b/perl-Pod-Coverage.spec
@@ -0,0 +1,58 @@
+Name:           perl-Pod-Coverage
+Version:        0.23
+Release:        15
+Summary:        Checks if the documentation of a perl module is comprehensive
+License:        GPL+ or Artistic
+URL:            http://search.cpan.org/dist/Pod-Coverage/
+Source0:        http://www.cpan.org/authors/id/R/RC/RCLAMP/Pod-Coverage-%{version}.tar.gz
+Patch0001:      Pod-Coverage-0.23-Do-not-search-.-lib-by-pod_cover.patch
+BuildArch:      noarch
+BuildRequires:  perl-interpreter perl-generators perl(B) perl(base) perl(constant)
+BuildRequires:  perl(Data::Dumper) perl(Devel::Symdump) >= 2.01 perl(Exporter) perl(vars)
+BuildRequires:  perl(ExtUtils::MakeMaker) perl(lib) perl(Pod::Find) >= 0.21 perl(warnings)
+BuildRequires:  perl(Pod::Parser) >= 1.13 perl(strict) perl(Test::More) perl(Test::Pod)
+
+Requires:       perl(Devel::Symdump) >= 2.01 perl(Pod::Find) >= 0.21 perl(Pod::Parser) >= 1.13
+Requires:       perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version))
+
+%{?perl_default_filter}
+%global __requires_exclude %{?__requires_exclude:__requires_exclude|}^perl\\(Devel::Symdump\\)$
+%global __requires_exclude %{?__requires_exclude:%__requires_exclude|}^perl\\(Pod::Find\\)$
+%global __requires_exclude %{?__requires_exclude:%__requires_exclude|}^perl\\(Pod::Parser\\)$
+
+%description
+This perl module provides a mechanism for determining if the pod for a
+given module is comprehensive.
+
+%package help
+Summary:        Help document for the %{name} package
+
+%description    help
+Help document for the %{name} package.
+
+%prep
+%autosetup -n Pod-Coverage-%{version} -p1
+
+%build
+perl Makefile.PL INSTALLDIRS=vendor
+%make_build
+
+%install
+make pure_install DESTDIR=%{buildroot}
+find %{buildroot} -type f -name .packlist -exec rm -f {} \;
+%{_fixperms} %{buildroot}/*
+
+%check
+make test
+
+%files
+%doc Changes examples
+%{_bindir}/pod_cover
+%{perl_vendorlib}/Pod/
+
+%files help
+%{_mandir}/man3/*
+
+%changelog
+* Sun Dec 1 2019 wangzhishun <wangzhishun1@huawei.com> - 0.23-15
+- Package init