diff --git a/B-Keywords-1.20.tar.gz b/B-Keywords-1.20.tar.gz
new file mode 100644
index 0000000..5fc5ea2
Binary files /dev/null and b/B-Keywords-1.20.tar.gz differ
diff --git a/Class-Data-Inheritable-0.08-clean.tar.gz b/Class-Data-Inheritable-0.08-clean.tar.gz
deleted file mode 100644
index 9cdbe6f..0000000
Binary files a/Class-Data-Inheritable-0.08-clean.tar.gz and /dev/null differ
diff --git a/perl-B-Keywords.spec b/perl-B-Keywords.spec
new file mode 100644
index 0000000..f452552
--- /dev/null
+++ b/perl-B-Keywords.spec
@@ -0,0 +1,56 @@
+%bcond_with perl_B_Keywords_enables_extra_test
+Name:                perl-B-Keywords
+Version:             1.20
+Release:             1
+Summary:             Lists of reserved barewords and symbol names
+License:             GPL+ or Artistic
+URL:                 https://metacpan.org/release/B-Keywords
+Source0:             https://cpan.metacpan.org/modules/by-module/B/B-Keywords-%{version}.tar.gz
+BuildArch:           noarch
+BuildRequires:       coreutils findutils make perl-generators perl-interpreter perl(Config)
+BuildRequires:       perl(ExtUtils::MakeMaker) perl(Exporter) perl(strict) perl(vars) perl-devel
+BuildRequires:       perl(File::Spec) perl(lib) perl(Test) perl(Test::More) perl(Test::Pod) >= 1.0
+%if 0%{!?perl_bootstrap:1} && %{with perl_B_Keywords_enables_extra_test}
+BuildRequires:       perl(File::Copy) perl(Perl::MinimumVersion) >= 1.20
+BuildRequires:       perl(Test::CPAN::Meta) >= 0.12 perl(Test::Kwalitee)
+BuildRequires:       perl(Test::MinimumVersion) >= 0.008 perl(Test::More) >= 0.88
+BuildRequires:       perl(Test::Pod::Coverage) >= 1.04 perl(warnings)
+%endif
+Requires:            perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version))
+%description
+B::Keywords supplies several arrays of exportable keywords: @Scalars, @Arrays,
+@Hashes, @Filehandles, @Symbols, @Functions, @Barewords, @TieIOMethods,
+@UNIVERSALMethods and @ExporterSymbols.
+The @Symbols array includes the contents of each of @Scalars, @Arrays, @Hashes,
+@Functions and @Filehandles.
+Similarly, @Barewords adds a few non-function keywords and operators to the
+@Functions array.
+
+%prep
+%setup -q -n B-Keywords-%{version}
+
+%build
+perl Makefile.PL INSTALLDIRS=vendor
+make %{?_smp_mflags}
+
+%install
+make pure_install DESTDIR=%{buildroot}
+find %{buildroot} -type f -name .packlist -delete
+%{_fixperms} -c %{buildroot}
+
+%check
+%if 0%{!?perl_bootstrap:1} && %{with perl_B_Keywords_enables_extra_test}
+make test IS_MAINTAINER=1 AUTHOR_TESTING=1
+%else
+make test
+%endif
+
+%files
+%license LICENSE
+%doc Changes
+%{perl_vendorlib}/B/
+%{_mandir}/man3/B::Keywords.3*
+
+%changelog
+* Fri May 14 2021 xxxxxx <xxxxxx@huawei.com> - 1.20-1
+- package init
diff --git a/perl-Class-Data-Inheritable.spec b/perl-Class-Data-Inheritable.spec
deleted file mode 100644
index c004794..0000000
--- a/perl-Class-Data-Inheritable.spec
+++ /dev/null
@@ -1,45 +0,0 @@
-%bcond_without perl_Class_Data_Inheritable_enables_optional_test
-Name:                perl-Class-Data-Inheritable
-Version:             0.08
-Release:             1
-Summary:             Inheritable, overridable class data
-License:             GPL+ or Artistic
-URL:                 https://metacpan.org/release/Class-Data-Inheritable
-Source0:             Class-Data-Inheritable-%{version}-clean.tar.gz
-BuildArch:           noarch
-BuildRequires:       coreutils findutils make perl-generators perl-interpreter
-BuildRequires:       perl(ExtUtils::MakeMaker) perl(Carp) perl(strict) perl(vars) perl(base)
-BuildRequires:       perl(Test::More)
-%if %{with perl_Class_Data_Inheritable_enables_optional_test}
-BuildRequires:       perl(Test::Pod) >= 1.00 perl(Test::Pod::Coverage) >= 1.00
-%endif
-Requires:            perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version)) perl(Carp)
-%description
-Class::Data::Inheritable is for creating accessor/mutators to
-class data. That is, if you want to store something about your
-class as a whole (instead of about a single object). This data
-is then inherited by your sub-classes and can be overridden.
-
-%prep
-%setup -q -n Class-Data-Inheritable-%{version}
-
-%build
-perl Makefile.PL INSTALLDIRS=vendor
-make
-
-%install
-rm -rf %{buildroot}
-make pure_install DESTDIR=%{buildroot}
-find %{buildroot} -type f -name .packlist -delete
-%{_fixperms} %{buildroot}
-
-%check
-make test
-
-%files
-%{perl_vendorlib}/Class/
-%{_mandir}/man3/Class::Data::Inheritable.3pm*
-
-%changelog
-* Fri May 14 2021 xxxxxx <xxxxxx@huawei.com> - 0.08-1
-- package init