!2 【轻量级 PR】：添加%{mod_name}宏

From: @hongjinghao 
Reviewed-by: @caodongxia 
Signed-off-by: @caodongxia

perl-XML-SAX-Base.spec

@@ -1,10 +1,12 @@
+%define mod_name XML-SAX-Base
+
 Name:           perl-XML-SAX-Base
 Version:        1.09
-Release:        7
+Release:        8
 Summary:        Base class SAX Drivers and Filters
 License:        GPL+ or Artistic
-URL:            https://metacpan.org/release/XML-SAX-Base
-Source0:        https://cpan.metacpan.org/authors/id/G/GR/GRANTM/XML-SAX-Base-%{version}.tar.gz
+URL:            https://metacpan.org/release/%{mod_name}
+Source0:        https://cpan.metacpan.org/authors/id/G/GR/GRANTM/%{mod_name}-%{version}.tar.gz
 BuildArch:      noarch
 BuildRequires:  coreutils, perl-interpreter, perl-generators
 BuildRequires:  perl(base), perl(Carp), perl(ExtUtils::MakeMaker) >= 6.76
@@ -26,7 +28,7 @@ Requires:       man
 This package includes man files for perl-XML-SAX-Base.
 
 %prep
-%autosetup -n XML-SAX-Base-%{version} -p1
+%autosetup -n %{mod_name}-%{version} -p1
 
 %build
 perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1
@@ -51,5 +53,8 @@ make test
 %{_mandir}/man*/*
 
 %changelog
+* Mon Oct 31 2022 hongjinghao <hongjinghao@huawei.com> - 1.09-8
+- use %{mod_name} marco
+
 * Wed Nov 27 2019 openEuler Buildteam <buildteam@openeuler.org> - 1.09-7
 - Package init