diff --git a/perl-Net-LibIDN.spec b/perl-Net-LibIDN.spec
index 0d74fdbfb18e276d68b4aeba3f8d0588377a3508..69641970fa98cbc1c6edcf513a254eb9fa9b8587 100644
--- a/perl-Net-LibIDN.spec
+++ b/perl-Net-LibIDN.spec
@@ -1,10 +1,12 @@
-Name:           perl-Net-LibIDN
+%define mod_name Net-LibIDN
+
+Name:           perl-%{mod_name}
 Version:        0.12
-Release:        33
+Release:        34
 Summary:        Perl bindings for GNU Libidn
 License:        GPL+ or Artistic
-URL:            https://metacpan.org/release/Net-LibIDN
-Source0:        https://cpan.metacpan.org/authors/id/T/TH/THOR/Net-LibIDN-%{version}.tar.gz
+URL:            https://metacpan.org/release/%{mod_name}
+Source0:        https://cpan.metacpan.org/authors/id/T/TH/THOR/%{mod_name}-%{version}.tar.gz
 Patch0:         Net-LibIDN-0.12-Respect-Config-s-cc-ccflags-and-ldflags.patch
 
 BuildRequires:  gcc libidn-devel perl-interpreter perl-devel perl-generators
@@ -22,7 +24,7 @@ Turbo Fredriksson's PHP-IDN.
 %package_help
 
 %prep
-%autosetup -n Net-LibIDN-%{version} -p1
+%autosetup -n %{mod_name}-%{version} -p1
 
 for F in _LibIDN.pm; do
     iconv -f latin1 -t utf-8 < "$F" > "${F}.utf"
@@ -53,5 +55,8 @@ make test
 %{_mandir}/man3/Net::LibIDN.3pm.gz
 
 %changelog
+* Tue Oct 25 2022 jiangchuangang <jiangchuangang@huawei.com> - 0.12-34
+- define mod_name to opitomize the specfile
+
 * Mon Feb 17 2020 openEuler Buildteam <buildteam@openeuler.org> - 0.12-33
 - Package init