define mod_name to opitomize the specfile

perl-Encode-Locale.spec

@@ -1,10 +1,11 @@
-Name:           perl-Encode-Locale
+%define mod_name Encode-Locale
+Name:           perl-%{mod_name}
 Version:        1.05
-Release:        12
+Release:        13
 Summary:        Determine the interfacing encoding
 License:        GPL+ or Artistic
-URL:            https://metacpan.org/release/Encode-Locale
+URL:            https://metacpan.org/release/%{mod_name}
-Source0:        https://cpan.metacpan.org/authors/id/G/GA/GAAS/Encode-Locale-%{version}.tar.gz
+Source0:        https://cpan.metacpan.org/authors/id/G/GA/GAAS/%{mod_name}-%{version}.tar.gz
 BuildArch:      noarch
 BuildRequires:  findutils
 BuildRequires:  perl-interpreter, perl-generators, perl(ExtUtils::MakeMaker), perl(base)
@@ -18,15 +19,15 @@ The purpose of this Perl module is try determine what encodings should be used
 when interfacing to various external interfaces.
 
 %package        help
-Summary:        Including man files for perl-Encode-Locale
+Summary:        Including man files for perl-%{mod_name}
 Requires:       man
 BuildArch:      noarch
 
 %description    help
-This contains man files for the using of perl-Encode-Locale.
+This contains man files for the using of perl-%{mod_name}.
 
 %prep
-%autosetup -n Encode-Locale-%{version}
+%autosetup -n %{mod_name}-%{version}
 
 %build
 %__perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1
@@ -47,5 +48,8 @@ make test
 %{_mandir}/man3/*
 
 %changelog
+* Tue Oct 25 2022 huyubiao <huyubiao@huawei.com> - 1.05-13
+- define mod_name to opitomize the specfile
+
 * Sat Sep 14 2019 wangjufeng<wangjufeng@huawei.com> - 1.05-12
 - openEuler Debranding