diff --git a/perl-Locale-Codes.spec b/perl-Locale-Codes.spec
index c87ef68..dd5bf97 100644
--- a/perl-Locale-Codes.spec
+++ b/perl-Locale-Codes.spec
@@ -1,10 +1,12 @@
-Name:         perl-Locale-Codes
+%define mod_name Locale-Codes
+
+Name:         perl-%{mod_name}
 Version:      3.68
 Release:      2
 Summary:      A distribution of modules to handle locale codes
 License:      GPL+ or Artistic
-URL:          https://metacpan.org/release/Locale-Codes
-Source0:      https://cpan.metacpan.org/authors/id/S/SB/SBECK/Locale-Codes-%{version}.tar.gz
+URL:          https://metacpan.org/release/%{mod_name}
+Source0:      https://cpan.metacpan.org/authors/id/S/SB/SBECK/%{mod_name}-%{version}.tar.gz
 BuildArch:    noarch
 
 BuildRequires:coreutils findutils perl-generators perl-interpreter
@@ -18,7 +20,7 @@ work with sets of codes which uniquely identify something.
 %package_help
 
 %prep
-%autosetup -n Locale-Codes-%{version} -p1 
+%autosetup -n %{mod_name}-%{version} -p1
 
 %build
 perl Makefile.PL INSTALLDIRS=vendor NO_PERLLOCAL=1 NO_PACKLIST=1
@@ -52,7 +54,7 @@ make test
 
 %changelog
 * Thu Oct 20 2022 xujing <xujing99@huawei.com> - 3.68-2
-- update release
+- define mod_name to opitomize the specfile
 
 * Sat Dec 25 2021 tianwei <tianwei12@huawei.com> - 3.68-1
 - upgrade version to 3.68