diff --git a/perl-GD-Barcode.spec b/perl-GD-Barcode.spec
index 65629f9d2bd55b4c65bca3eb35f8e0e4ad4fb5a3..4512b19602576a1267f54ced53b934d87a995624 100644
--- a/perl-GD-Barcode.spec
+++ b/perl-GD-Barcode.spec
@@ -1,8 +1,8 @@
 Name:           perl-GD-Barcode
 Version:        1.15
-Release:        30
+Release:        31
 Summary:        Create barcode image with GD
-License:        GPL+ or Artistic
+License:        GPL-1.0-or-later or Artistic-1.0-Perl
 URL:            https://metacpan.org/release/GD-Barcode
 Source0:        https://cpan.metacpan.org/authors/id/K/KW/KWITKNR/GD-Barcode-%{version}.tar.gz
 
@@ -42,5 +42,8 @@ make test
 %{_mandir}/man3/*
 
 %changelog
+* Wed Nov 02 2022 wangjiang <wangjiang37@h-partners.com> - 1.15-31
+- modify the license to make it specification
+
 * Mon Feb 17 2020 openEuler Buildteam <buildteam@openeuler.org> - 1.15-30
 - Package init