diff --git a/perl-IO-HTML.spec b/perl-IO-HTML.spec
index 6d2c52e..cfc1184 100644
--- a/perl-IO-HTML.spec
+++ b/perl-IO-HTML.spec
@@ -1,10 +1,12 @@
-Name:           perl-IO-HTML
+%define mod_name IO-HTML
+
+Name:           perl-%{mod_name}
 Version:        1.004
-Release:        1
+Release:        2
 Summary:        Open an HTML file with automatic charset detection
 License:        GPL+ or Artistic
-URL:            https://metacpan.org/release/IO-HTML
-Source0:        https://cpan.metacpan.org/authors/id/C/CJ/CJM/IO-HTML-%{version}.tar.gz
+URL:            https://metacpan.org/release/%{mod_name}
+Source0:        https://cpan.metacpan.org/authors/id/C/CJ/CJM/%{mod_name}-%{version}.tar.gz
 BuildArch:      noarch
 
 BuildRequires:  perl-interpreter perl-generators perl(ExtUtils::MakeMaker) >= 6.30
@@ -19,13 +21,13 @@ based on the HTML5 algorithm.  You can then pass the filehandle to
 HTML::Parser or a related module (or just read it yourself).
 
 %package help
-Summary:        Documentation for perl-IO-HTML
+Summary:        Documentation for perl-%{mod_name}
 
 %description help
-Documentation for perl-IO-HTML.
+Documentation for perl-%{mod_name}.
 
 %prep
-%autosetup -n IO-HTML-%{version} -p1
+%autosetup -n %{mod_name}-%{version} -p1
 
 %build
 perl Makefile.PL INSTALLDIRS=vendor
@@ -49,6 +51,9 @@ make test
 %{_mandir}/man3/*
 
 %changelog
+* Mon Oct 24 2022 hongjinghao <hongjinghao@huawei.com> - 1.004-2
+- Add mod_name Macro
+
 * Fri Dec  3 2021 guozhaorui <guozhaorui1@huawei.com> - 1.004-1
 - update version to 1.004