diff --git a/perl-Socket.spec b/perl-Socket.spec
index 276e6c3f1b7d0df8a9d46d93533d638e642b4c75..ce825626ac39b72e8bbbee4b04b45991d50d05ea 100644
--- a/perl-Socket.spec
+++ b/perl-Socket.spec
@@ -1,7 +1,9 @@
+%define anolis_release .0.1
+
 Name:           perl-Socket
 Epoch:          4
 Version:        2.027
-Release:        3%{?dist}
+Release:        3%{anolis_release}%{?dist}
 Summary:        Networking constants and support functions
 License:        GPL+ or Artistic
 URL:            http://search.cpan.org/dist/Socket/
@@ -42,6 +44,14 @@ socket(), setsockopt() and bind(). It also provides several other support
 functions, mostly for dealing with conversions of network addresses between
 human-readable and native binary forms, and for hostname resolver operations.
 
+%package doc
+Summary:   Documents for %{name}
+Requires:  %{name} = %{?epoch:%{epoch}:}%{version}-%{release}
+BuildArch: noarch
+
+%description doc
+Doc pages for %{name}.
+
 %prep
 %setup -q -n Socket-%{version}
 %patch0 -p1
@@ -60,12 +70,17 @@ make test
 
 %files
 %license Artistic Copying LICENSE
-%doc Changes
 %{perl_vendorarch}/auto/*
 %{perl_vendorarch}/Socket*
 %{_mandir}/man3/*
 
+%files doc
+%doc Changes
+
 %changelog
+* Tue Jul 19 2022 Liwei Ge <liwei.glw@alibaba-inc.com> - 4:2.027-3.0.1
+- Add doc sub package
+
 * Mon Apr 15 2019 Petr Pisar <ppisar@redhat.com> - 4:2.027-3
 - Make Socket::inet_aton() thread safe (bug #1699793)