diff --git a/perl-HTML-Tagset.spec b/perl-HTML-Tagset.spec
index 2c119db..2f3c862 100644
--- a/perl-HTML-Tagset.spec
+++ b/perl-HTML-Tagset.spec
@@ -1,10 +1,11 @@
-Name:           perl-HTML-Tagset
+%define mod_name HTML-Tagset
+Name:           perl-%{mod_name}
 Version:        3.20
-Release:        37
+Release:        38
 Summary:        HTML::Tagset - data tables useful in parsing HTML
 License:        GPL+ or Artistic
-URL:            https://metacpan.org/release/HTML-Tagset
-Source0:        https://cpan.metacpan.org/authors/id/P/PE/PETDANCE/HTML-Tagset-%{version}.tar.gz
+URL:            https://metacpan.org/release/%{mod_name}
+Source0:        https://cpan.metacpan.org/authors/id/P/PE/PETDANCE/%{mod_name}-%{version}.tar.gz
 
 BuildArch:      noarch
 
@@ -20,13 +21,13 @@ This module contains data tables useful in dealing with HTML.
 It provides no functions or methods.
 
 %package help
-Summary:        Documentation for perl-HTML-Tagset
+Summary:        Documentation for perl-%{mod_name}
 
 %description help
-Documentation for perl-HTML-Tagset.
+Documentation for perl-%{mod_name}.
 
 %prep
-%autosetup -n HTML-Tagset-%{version} -p1
+%autosetup -n %{mod_name}-%{version} -p1
 
 %build
 perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1
@@ -49,6 +50,9 @@ make test
 
 
 %changelog
+* Mon Oct 24 2022 yangmingtai <yangmingtai@huawei.com> - 3.20-38
+- define mod_name to opitomize the specfile
+
 * Tue Oct 22 2019 Zaiwang Li <lizaiwang1@huawei.com> - 3.20-37
 - Init Package.