diff --git a/perl-Digest-SHA.spec b/perl-Digest-SHA.spec
index aea2d6bf4df76a5ccdfa1a6744073cd18450c78f..e35c0eba17bc693f0383d7b31a77330e39090b2c 100644
--- a/perl-Digest-SHA.spec
+++ b/perl-Digest-SHA.spec
@@ -1,13 +1,14 @@
 %bcond_without perl_Digest_SHA_enables_digest_base
+%define mod_name Digest-SHA
 
-Name:           perl-Digest-SHA
+Name:           perl-%{mod_name}
 Epoch:          1
 Version:        6.02
-Release:        7
+Release:        8
 Summary:        Perl extension for SHA-1/224/256/384/512
 License:        GPL+ or Artistic
-URL:            https://metacpan.org/release/Digest-SHA
-Source0:        https://cpan.metacpan.org/authors/id/M/MS/MSHELOR/Digest-SHA-%{version}.tar.gz
+URL:            https://metacpan.org/release/%{mod_name}
+Source0:        https://cpan.metacpan.org/authors/id/M/MS/MSHELOR/%{mod_name}-%{version}.tar.gz
 BuildRequires:  coreutils findutils gcc make perl-devel perl-generators perl-interpreter 
 BuildRequires:  perl(Config) perl(ExtUtils::MakeMaker) perl(Getopt::Std) perl(strict) perl(vars)
 BuildRequires:  perl(Carp) perl(Exporter) perl(Fcntl) perl(integer) perl(warnings) perl(XSLoader)
@@ -40,7 +41,7 @@ handle all types of input, including partial-byte data.
 %package_help
 
 %prep
-%autosetup -n Digest-SHA-%{version} -p1
+%autosetup -n %{mod_name}-%{version} -p1
 chmod -x examples/*
 perl -MExtUtils::MakeMaker -e 'ExtUtils::MM_Unix->fixin(q{examples/dups})'
 
@@ -67,6 +68,9 @@ make test
 %{_mandir}/*/Digest::SHA.3*
 
 %changelog
+* Wed Oct 26 2022 wangyuhang <wangyuhang27@huawei.com> - 1:6.02-8
+- define mod_name to opitomize the specfile
+
 * Sat Jan 11 2020 openEuler Buildteam <buildteam@openeuler.org> - 1:6.02-7
 - Type: enhancement
 - ID: NA