diff --git a/Test-Harness-3.42.tar.gz b/Test-Harness-3.42.tar.gz
new file mode 100644
index 0000000000000000000000000000000000000000..5056e1ecc7da83fde4be87a896fbe8e897fa300d
Binary files /dev/null and b/Test-Harness-3.42.tar.gz differ
diff --git a/perl-Test-Harness.spec b/perl-Test-Harness.spec
new file mode 100644
index 0000000000000000000000000000000000000000..dc3a8b7117dafa905b39a47250f85e66ac68c87c
--- /dev/null
+++ b/perl-Test-Harness.spec
@@ -0,0 +1,102 @@
+%define anolis_release 1
+
+# Run optional tests
+%bcond_with perl_Test_Harness_enables_optional_test
+
+Name:           perl-Test-Harness
+Epoch:          1
+Version:        3.42
+Release: %{anolis_release}%{dist}
+Summary:        Run Perl standard test scripts with statistics
+License:        GPL+ or Artistic
+URL:            https://metacpan.org/release/Test-Harness
+Source0:        https://cpan.metacpan.org/authors/id/L/LE/LEONT/Test-Harness-%{version}.tar.gz
+
+BuildArch:      noarch
+BuildRequires:  coreutils
+BuildRequires:  make
+BuildRequires:  perl-generators
+BuildRequires:  perl-interpreter
+BuildRequires:  perl(ExtUtils::MakeMaker) >= 6.76
+BuildRequires:  perl(strict)
+BuildRequires:  perl(warnings)
+# Run-time:
+BuildRequires:  perl(base)
+BuildRequires:  perl(Benchmark)
+BuildRequires:  perl(Carp)
+BuildRequires:  perl(Config)
+BuildRequires:  perl(constant)
+BuildRequires:  perl(Exporter)
+BuildRequires:  perl(File::Basename)
+BuildRequires:  perl(File::Find)
+BuildRequires:  perl(File::Path)
+BuildRequires:  perl(File::Spec)
+BuildRequires:  perl(Getopt::Long)
+BuildRequires:  perl(IO::Handle)
+BuildRequires:  perl(IO::Select)
+BuildRequires:  perl(POSIX)
+BuildRequires:  perl(Text::ParseWords)
+# Optional run-time:
+BuildRequires:  perl(Encode)
+# Keep Pod::Usage 1.12 really optional
+BuildRequires:  perl(Term::ANSIColor)
+BuildRequires:  perl(Time::HiRes)
+# Tests:
+BuildRequires:  perl(Data::Dumper)
+# Dev::Null bundled for bootstrap
+BuildRequires:  perl(File::Spec::Functions)
+BuildRequires:  perl(IO::File)
+BuildRequires:  perl(lib)
+BuildRequires:  perl(Symbol)
+BuildRequires:  perl(Test::More)
+# Optional tests:
+%if %{with perl_Test_Harness_enables_optional_test}
+BuildRequires:  perl(CPAN::Meta::YAML)
+BuildRequires:  perl(File::Temp)
+%if !%{defined perl_bootstrap}
+BuildRequires:  perl(TAP::Formatter::HTML) >= 0.10
+BuildRequires:  perl(TAP::Harness::Archive)
+BuildRequires:  perl(YAML)
+%endif
+%endif
+Requires:       perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version))
+Suggests:       perl(Term::ANSIColor)
+Suggests:       perl(Time::HiRes)
+
+# Filter example dependencies
+%global __requires_exclude_from %{?__requires_exclude_from:%__requires_exclude_from|}^%{_datadir}/doc
+%global __provides_exclude_from %{?__provides_exclude_from:%__provides_exclude_from|}^%{_datadir}/doc
+
+%description
+This package allows tests to be run and results automatically aggregated and
+output to STDOUT.
+
+Although, for historical reasons, the Test-Harness distribution takes its name
+from this module it now exists only to provide TAP::Harness with an interface
+that is somewhat backwards compatible with Test::Harness 2.xx. If you're
+writing new code consider using TAP::Harness directly instead.
+
+%prep
+%setup -q -n Test-Harness-%{version}
+
+%build
+perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1 NO_PERLLOCAL=1
+%{make_build}
+
+%install
+%{make_install}
+%{_fixperms} $RPM_BUILD_ROOT/*
+
+%check
+make test
+
+%files
+%doc Changes Changes-2.64 examples README
+%{perl_vendorlib}/*
+%{_bindir}/*
+%{_mandir}/man1/*
+%{_mandir}/man3/*
+
+%changelog 
+* Wed Apr 20 2022 Zhongling He <zhonglingh@linux.alibaba.com> - 3.42-1
+- Init package from upstream v3.42