diff --git a/Business-ISBN-Data-20210112.006.tar.gz b/Business-ISBN-Data-20210112.006.tar.gz
deleted file mode 100644
index 774649d..0000000
Binary files a/Business-ISBN-Data-20210112.006.tar.gz and /dev/null differ
diff --git a/Business-ISBN-Data-20230719.001.tar.gz b/Business-ISBN-Data-20230719.001.tar.gz
new file mode 100644
index 0000000..e4aceab
Binary files /dev/null and b/Business-ISBN-Data-20230719.001.tar.gz differ
diff --git a/Business-ISBN-Data-shellbang.patch b/Business-ISBN-Data-shellbang.patch
deleted file mode 100644
index 4903200..0000000
--- a/Business-ISBN-Data-shellbang.patch
+++ /dev/null
@@ -1,22 +0,0 @@
-From 9671a6dc3bcddf0cee417c65319ee7cb0ddf954c Mon Sep 17 00:00:00 2001
-From: openEuler Buildteam <buildteam@openeuler.org>
-Date: Mon, 10 Feb 2020 16:46:46 +0800
-Subject: [PATCH] Business ISBN Data shellbang
-
----
- make_data.pl | 2 +-
- 1 file changed, 1 insertion(+), 1 deletion(-)
-
-diff --git a/make_data.pl b/make_data.pl
-index f470df4..f0c9aff 100644
---- a/make_data.pl
-+++ b/make_data.pl
-@@ -1,4 +1,4 @@
--#!/usr/local/bin/perl5.10.0
-+#!/usr/bin/perl
- use 5.010;
- 
- use strict;
--- 
-1.8.3.1
-
diff --git a/perl-Business-ISBN-Data.spec b/perl-Business-ISBN-Data.spec
index e6f9521..b7cca22 100644
--- a/perl-Business-ISBN-Data.spec
+++ b/perl-Business-ISBN-Data.spec
@@ -1,16 +1,15 @@
 %define mod_name Business-ISBN-Data
 Name:           perl-%{mod_name}
-Version:        20210112.006
-Release:        2
-Summary:	Data pack for Business::ISBN
+Version:        20230719.001
+Release:        1
+Summary:        Data pack for Business::ISBN
 License:        GPL+ or Artistic
 URL:            https://metacpan.org/pod/Business::ISBN::Data
 Source0:        https://cpan.metacpan.org/authors/id/B/BD/BDFOY/%{mod_name}-%{version}.tar.gz
 
-Patch0:         Business-ISBN-Data-shellbang.patch
 BuildArch:      noarch
 BuildRequires:  coreutils findutils make perl-interpreter perl-generators
-BuildRequires:  perl(ExtUtils::MakeMaker) >= 6.64
+BuildRequires:  perl(ExtUtils::MakeMaker) >= 6.76
 # Test Suite
 BuildRequires:  perl(Test::More) perl(Test::Pod) perl(Test::Pod::Coverage)
 Requires:       perl(:MODULE_COMPAT_%(perl -V:version | cut -d"'" -f 2))
@@ -23,8 +22,6 @@ This package is the data pack for Business::ISBN
 %prep
 %autosetup -n %{mod_name}-%{version} -p1
 
-chmod -c +x make_data.pl
-
 %build
 perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1
 make %{?_smp_mflags}
@@ -45,6 +42,9 @@ make test
 %{_mandir}/man3/Business::ISBN::Data.3*
 
 %changelog
+* Wed Jul 26 2023 zhangyao <zhangyao108@huawei.com> - 20230719.001-1
+- update version to 20230719.001
+
 * Mon Oct 31 2022 hongjinghao <hongjinghao@huawei.com> - 20210112.006-2
 - use %{mod_name} marco