diff --git a/perl-Text-Balanced.spec b/perl-Text-Balanced.spec
index 1b09c9d..f62c9e2 100644
--- a/perl-Text-Balanced.spec
+++ b/perl-Text-Balanced.spec
@@ -1,6 +1,6 @@
 Name:           perl-Text-Balanced
 Version:        2.03
-Release:        419
+Release:        420
 Summary:        Extract delimited text sequences from strings
 License:        GPL+ or Artistic
 URL:            https://metacpan.org/release/Text-Balanced
@@ -29,6 +29,7 @@ perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1
 
 %install
 make pure_install DESTDIR=$RPM_BUILD_ROOT
+%{_fixperms} %{buildroot}/*
 
 %check
 make test
@@ -45,6 +46,12 @@ make test
 %{_mandir}/man3/*
 
 %changelog
+* Sat Dec 21 2019 openEuler Buildteam <buildteam@openeuler.org> - 2.03-420
+- Type:enhancement
+- ID:NA
+- SUG:NA
+- DESC:change mod of files
+
 * Sun Sep 29 2019 shenyangyang <shenyangyang4@huawei.com> - 2.03-419
 - Type:NA
 - ID:NA