diff --git a/XML-LibXML-PrettyPrint-0.006-Normalize-shell-bang.patch b/XML-LibXML-PrettyPrint-0.006-Normalize-shell-bang.patch
new file mode 100644
index 0000000..f98e552
--- /dev/null
+++ b/XML-LibXML-PrettyPrint-0.006-Normalize-shell-bang.patch
@@ -0,0 +1,26 @@
+From 01a2555beff4303908b4f940a2054b1938b32fb1 Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
+Date: Wed, 12 Jul 2017 08:42:26 +0200
+Subject: [PATCH] Normalize shell bang
+MIME-Version: 1.0
+Content-Type: text/plain; charset=UTF-8
+Content-Transfer-Encoding: 8bit
+
+Signed-off-by: Petr Písař <ppisar@redhat.com>
+---
+ bin/xml-pretty | 2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+
+diff --git a/bin/xml-pretty b/bin/xml-pretty
+index a9fd406..d647105 100644
+--- a/bin/xml-pretty
++++ b/bin/xml-pretty
+@@ -1,4 +1,4 @@
+-#!/usr/bin/env perl
++#!perl
+ 
+ use XML::LibXML::PrettyPrint qw(print_xml);
+ print_xml <>;
+-- 
+2.9.4
+
diff --git a/XML-LibXML-PrettyPrint-0.006.tar.gz b/XML-LibXML-PrettyPrint-0.006.tar.gz
new file mode 100644
index 0000000..e1db9e3
Binary files /dev/null and b/XML-LibXML-PrettyPrint-0.006.tar.gz differ
diff --git a/perl-XML-LibXML-PrettyPrint.spec b/perl-XML-LibXML-PrettyPrint.spec
new file mode 100644
index 0000000..6d6a4d1
--- /dev/null
+++ b/perl-XML-LibXML-PrettyPrint.spec
@@ -0,0 +1,64 @@
+Name:           perl-XML-LibXML-PrettyPrint
+Version:        0.006
+Release:        5
+Summary:        Add pleasant white space to an XML tree
+# CONTRIBUTING: GPL+ or Artistic or CC-BY-SA
+# COPYRIGHT:    Public Domain
+# LICENSE:      GPL1 and Artistic license text
+# Other files:  GPL+ or Artistic
+License:        (GPL+ or Artistic) and (GPL+ or Artistic or CC-BY-SA) and Public Domain
+URL:            https://metacpan.org/release/XML-LibXML-PrettyPrint
+Source0:        https://cpan.metacpan.org/authors/id/T/TO/TOBYINK/XML-LibXML-PrettyPrint-%{version}.tar.gz
+# Do not use /usr/bin/env in scripts
+Patch0:         XML-LibXML-PrettyPrint-0.006-Normalize-shell-bang.patch
+BuildArch:      noarch
+BuildRequires:  make
+BuildRequires:  perl-generators
+BuildRequires:  perl-interpreter
+BuildRequires:  perl(ExtUtils::MakeMaker) >= 6.76
+BuildRequires:  perl(strict)
+# Run-time:
+BuildRequires:  perl(:VERSION) >= 5.8.1
+BuildRequires:  perl(Carp)
+BuildRequires:  perl(constant)
+BuildRequires:  perl(Exporter::Tiny)
+BuildRequires:  perl(IO::Handle)
+BuildRequires:  perl(Scalar::Util)
+BuildRequires:  perl(utf8)
+BuildRequires:  perl(warnings)
+BuildRequires:  perl(XML::LibXML) >= 1.62
+# Tests:
+BuildRequires:  perl(Test::More) >= 0.96
+BuildRequires:  perl(Test::Warnings)
+Requires:       perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version))
+
+%description
+XML::LibXML::PrettyPrint is a Perl module that can be applied to an
+XML::LibXML DOM tree to reformat it into a more readable result.
+
+%prep
+%setup -q -n XML-LibXML-PrettyPrint-%{version}
+%patch0 -p1
+
+%build
+perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1
+make %{?_smp_mflags}
+
+%install
+make pure_install DESTDIR=$RPM_BUILD_ROOT
+%{_fixperms} $RPM_BUILD_ROOT/*
+
+%check
+make test
+
+%files
+%license LICENSE
+%doc Changes CONTRIBUTING COPYRIGHT CREDITS README
+%{_bindir}/*
+%{perl_vendorlib}/*
+%{_mandir}/man1/*
+%{_mandir}/man3/*
+
+%changelog
+* Fri Aug 7 2020 weidong <weidong@uniontech.com> - 0.006-5
+- Initial release for OpenEuler