diff --git a/Readonly-2.05.tar.gz b/Readonly-2.05.tar.gz
new file mode 100644
index 0000000..94f6b62
Binary files /dev/null and b/Readonly-2.05.tar.gz differ
diff --git a/perl-Readonly.spec b/perl-Readonly.spec
new file mode 100644
index 0000000..a8c9434
--- /dev/null
+++ b/perl-Readonly.spec
@@ -0,0 +1,45 @@
+Name:		perl-Readonly
+Version:	2.05
+Release:	8
+Summary:	Facility for creating read-only scalars, arrays, hashes
+License:	GPL+ or Artistic
+URL:		https://metacpan.org/release/Readonly
+Source0:	https://cpan.metacpan.org/authors/id/S/SA/SANKO/Readonly-%{version}.tar.gz
+Patch0:	        replace-shebang.patch
+BuildArch:	noarch
+BuildRequires:	coreutils perl-interpreter perl-generators
+BuildRequires:	perl(Module::Build::Tiny) >= 0.035
+Requires:       perl(:MODULE_COMPAT_%(perl -V:version | cut -d"'" -f 2))
+Requires:	perl(Carp) perl(Storable)
+
+%description
+This is a facility for creating non-modifiable variables. This is useful for
+configuration files, headers, etc. It can also be useful as a development and
+debugging tool for catching updates to variables that should not be changed.
+
+%package_help
+
+%prep
+%autosetup -n Readonly-%{version} -p1
+
+%build
+perl Build.PL --installdirs=vendor
+./Build
+
+%install
+./Build install --destdir=%{buildroot} --create_packlist=0
+
+%check
+./Build test
+
+%files
+%license LICENSE
+%{perl_vendorlib}/Readonly.pm
+
+%files help
+%doc Changes README.md  t/
+%{_mandir}/man3/Readonly.3*
+
+%changelog
+* Fri Feb 28 2020 openEuler Buildteam <buildteam@openeuler.org> - 2.05-8
+- Package init
diff --git a/replace-shebang.patch b/replace-shebang.patch
new file mode 100644
index 0000000..699c40d
--- /dev/null
+++ b/replace-shebang.patch
@@ -0,0 +1,105 @@
+--- a/t/bugs/001_assign.t
++++ b/t/bugs/001_assign.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ # Verify the Readonly function rejects initialization by assignment
+ use strict;
+ use warnings; no warnings 'misc';
+--- a/t/bugs/007_implicit_undef.t
++++ b/t/bugs/007_implicit_undef.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ # Verify the Readonly function accepts implicit undef values
+ use strict;
+ use Test::More;
+--- a/t/general/array.t
++++ b/t/general/array.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ 
+ # Readonly array tests
+ 
+--- a/t/general/deepa.t
++++ b/t/general/deepa.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ 
+ # Test Array vs Array1 functionality
+ 
+--- a/t/general/deeph.t
++++ b/t/general/deeph.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ 
+ # Test Hash vs Hash1 functionality
+ 
+--- a/t/general/deeps.t
++++ b/t/general/deeps.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ 
+ # Test Scalar vs Scalar1 functionality
+ 
+--- a/t/general/docs.t
++++ b/t/general/docs.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ # Examples from the docs -- make sure they work!
+ use strict;
+ use Test::More tests => 22;
+--- a/t/general/export.t
++++ b/t/general/export.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ # Readonly hash tests
+ use strict;
+ use Test::More tests => 1;
+--- a/t/general/hash.t
++++ b/t/general/hash.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ 
+ # Readonly hash tests
+ 
+--- a/t/general/readonly.t
++++ b/t/general/readonly.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ 
+ # Test the Readonly function
+ 
+--- a/t/general/reassign.t
++++ b/t/general/reassign.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ 
+ # Readonly reassignment-prevention tests
+ 
+--- a/t/general/scalar.t
++++ b/t/general/scalar.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl
+ 
+ # Readonly scalar tests
+ 
+--- a/t/general/tie.t
++++ b/t/general/tie.t
+@@ -1,4 +1,4 @@
+-#!perl -I../../lib
++#!/usr/bin/perl -I../../lib
+ # Test the Readonly function
+ use strict;
+ use Test::More tests => 4;
+