diff --git a/Test-Harness-3.38-Remove-shell-bangs.patch b/Test-Harness-3.38-Remove-shell-bangs.patch
new file mode 100644
index 0000000000000000000000000000000000000000..2e1f424720ffb0a1871c6fdf67962d83d1e9ff55
--- /dev/null
+++ b/Test-Harness-3.38-Remove-shell-bangs.patch
@@ -0,0 +1,37 @@
+From 6ea0e48ac56fc2c5e8600b5313f6c49b553c946b Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
+Date: Tue, 14 Mar 2017 09:45:12 +0100
+Subject: [PATCH] Remove shell bangs
+MIME-Version: 1.0
+Content-Type: text/plain; charset=UTF-8
+Content-Transfer-Encoding: 8bit
+
+Signed-off-by: Petr Písař <ppisar@redhat.com>
+---
+ examples/analyze_tests.pl  | 2 --
+ examples/silent-harness.pl | 2 --
+ 2 files changed, 4 deletions(-)
+
+diff --git a/examples/analyze_tests.pl b/examples/analyze_tests.pl
+index c821f98..4076d9b 100644
+--- a/examples/analyze_tests.pl
++++ b/examples/analyze_tests.pl
+@@ -1,5 +1,3 @@
+-#!/usr/bin/env perl
+-
+ use strict;
+ use warnings;
+ 
+diff --git a/examples/silent-harness.pl b/examples/silent-harness.pl
+index ae0e50e..6e477ed 100644
+--- a/examples/silent-harness.pl
++++ b/examples/silent-harness.pl
+@@ -1,5 +1,3 @@
+-#!/usr/bin/perl
+-#
+ # Run some tests and get back a data structure describing them.
+ 
+ use strict;
+-- 
+2.7.4
+
diff --git a/Test-Harness-3.44.tar.gz b/Test-Harness-3.44.tar.gz
deleted file mode 100644
index e9638647af5a915ac963c9e3c53067d1ea02e61f..0000000000000000000000000000000000000000
Binary files a/Test-Harness-3.44.tar.gz and /dev/null differ
diff --git a/Test-Harness-3.48.tar.gz b/Test-Harness-3.48.tar.gz
new file mode 100644
index 0000000000000000000000000000000000000000..d2e1b478a17f41ab3467e319c321b9376ca4205d
Binary files /dev/null and b/Test-Harness-3.48.tar.gz differ
diff --git a/perl-Test-Harness.spec b/perl-Test-Harness.spec
index 89f1b47ac68133436fb0a0ee3f24fa34c6d4266e..4a1aaf0df455d9053408e8c6b1e7001b4fc02106 100644
--- a/perl-Test-Harness.spec
+++ b/perl-Test-Harness.spec
@@ -1,9 +1,9 @@
-%define anolis_release 2
+%define anolis_release		1
 %define mod_name Test-Harness
 
 Name:           perl-Test-Harness
 Epoch:          1
-Version:        3.44
+Version:	3.48
 Release:        %{anolis_release}%{?dist}
 Summary:        Run Perl standard test scripts with statistics
 License:        GPL-1.0-or-later OR Artistic-1.0-Perl
@@ -11,6 +11,7 @@ URL:            https://metacpan.org/release/%{mod_name}
 Source0:        https://cpan.metacpan.org/authors/id/L/LE/LEONT/%{mod_name}-%{version}.tar.gz
 Source1:        test.sh
 Patch1:         0001-Test-Harness-3.38-Remove-shell-bangs.patch
+Patch2:	Test-Harness-3.38-Remove-shell-bangs.patch
 
 BuildRequires:  make coreutils
 BuildRequires:  perl-interpreter perl-generators
@@ -105,6 +106,10 @@ make test
 %doc README examples Changes-2.64 Changes 
 
 %changelog
+* Mon Jul 07 2025 wenyuzifang <lzx02244079@alibaba-inc.com> - 3.48-1
+- Updated to version 3.48 to fix xxxxxxxxx
+
+
 * Fri Apr 14 2023 Guyu Wang <guyu.wgy@linux.alibaba.com> - 1:3.44-2
 - Optimise spec file
 
@@ -118,4 +123,4 @@ make test
 - rebuild with perl 5.36.0
 
 * Wed Apr 20 2022 Zhongling He <zhonglingh@linux.alibaba.com> - 1:3.42-1
-- Init package from upstream v3.42
+- Init package from upstream v3.42
\ No newline at end of file