diff --git a/Test-Taint-1.08.tar.gz b/Test-Taint-1.08.tar.gz
new file mode 100644
index 0000000..dbc0f6f
Binary files /dev/null and b/Test-Taint-1.08.tar.gz differ
diff --git a/perl-Test-Taint.spec b/perl-Test-Taint.spec
new file mode 100644
index 0000000..ccba094
--- /dev/null
+++ b/perl-Test-Taint.spec
@@ -0,0 +1,84 @@
+%global _empty_manifest_terminate_build 0
+Name:           perl-Test-Taint
+Version:        1.08
+Release:        1
+Summary:        Tools to test taintedness
+License:        GPL+ or Artistic
+Group:          Development/Libraries
+URL:            http://search.cpan.org/dist/Test-Taint/
+Source0:        http://www.cpan.org/authors/id/P/PE/PETDANCE/Test-Taint-%{version}.tar.gz
+BuildRoot:      %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
+BuildRequires:  perl-generators
+BuildRequires:  perl(ExtUtils::MakeMaker)
+BuildRequires:  perl(Scalar::Util)
+BuildRequires:  perl(Test::Builder)
+BuildRequires:  perl(Test::More)
+Requires:       perl(Scalar::Util)
+Requires:       perl(Test::Builder)
+Requires:       perl(Test::More)
+Requires:       perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version))
+%description
+Tainted data is data that comes from an unsafe source, such as the command
+line, or, in the case of web apps, any GET or POST transactions. Read the
+perlsec man page for details on why tainted data is bad, and how to
+untaint the data.
+%package help
+Summary : Tools to test taintedness
+Provides: perl-Test-Taint-doc
+%description help
+Tainted data is data that comes from an unsafe source, such as the command
+line, or, in the case of web apps, any GET or POST transactions. Read the
+perlsec man page for details on why tainted data is bad, and how to
+untaint the data.
+%prep
+%setup -q -n Test-Taint-%{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 META.json
+%{perl_vendorarch}/auto/*
+%{perl_vendorarch}/Test*
+%files help
+%{_mandir}/*
+
+%changelog
+* Wed Jun 17 2020 Perl_Bot <Perl_Bot@openeuler.org> 1.08-1
+- Specfile autogenerated by Perl_Bot
diff --git a/perl-Test-Taint.yaml b/perl-Test-Taint.yaml
new file mode 100644
index 0000000..7802ce1
--- /dev/null
+++ b/perl-Test-Taint.yaml
@@ -0,0 +1,4 @@
+version-ctrl: metacpan
+src_repo: Test-Taint    
+mag_prefix: "^"
+seperator: "."