diff --git a/cpanspec.yml b/cpanspec.yml
index 9b7ec50..a6cea3a 100644
--- a/cpanspec.yml
+++ b/cpanspec.yml
@@ -4,11 +4,10 @@
 #sources:
 #  - source1
 #  - source2
-#patches:
-#  foo.patch: -p1
-#  bar.patch:
-#preamble: |-
-# BuildRequires:  gcc-c++
+patches:
+  fix_perl538.patch: -p0 PATCH-FIX-UPSTREAM deprecated smartmatch operator https://github.com/dex4er/perl-Exception-Base/issues/5
+preamble: |-
+ BuildRequires:  perl(Module::Build)
 #post_prep: |-
 # hunspell=`pkg-config --libs hunspell | sed -e 's,-l,,; s,  *,,g'`
 # sed -i -e "s,hunspell-X,$hunspell," t/00-prereq.t Makefile.PL 
diff --git a/fix_perl538.patch b/fix_perl538.patch
new file mode 100644
index 0000000..8a778fd
--- /dev/null
+++ b/fix_perl538.patch
@@ -0,0 +1,13 @@
+--- t/tlib/Exception/BaseTest.pm
++++ t/tlib/Exception/BaseTest.pm
+@@ -569,7 +569,8 @@
+     $self->assert_matches(qr/String at /, $obj);
+ 
+     # smart matching for Perl 5.10
+-    if ($] >= 5.010) {
++    # Deprecation warning added in 5.37.10
++    if ($] >= 5.010 && $] < 5.037010) {
+         no if $] >= 5.018, warnings => 'experimental::smartmatch';
+         eval q{
+             $self->assert_num_equals(1, 'String' ~~ $obj);
+ 
diff --git a/perl-Exception-Base.changes b/perl-Exception-Base.changes
index 0f1622b..ade25fd 100644
--- a/perl-Exception-Base.changes
+++ b/perl-Exception-Base.changes
@@ -1,3 +1,8 @@
+-------------------------------------------------------------------
+Tue Aug  8 09:01:24 UTC 2023 - Dirk Stoecker <opensuse@dstoecker.de>
+
+- fix deprecation warning with perl 5.38: fix_perl538.patch
+
 -------------------------------------------------------------------
 Fri Nov 20 09:32:52 UTC 2015 - coolo@suse.com
 
@@ -22,4 +27,3 @@ Mon Apr  4 08:38:50 UTC 2011 - coolo@novell.com
 
 - initial package 0.2401
     * created by cpanspec 1.78.03
-
diff --git a/perl-Exception-Base.spec b/perl-Exception-Base.spec
index da6a21b..b0fb76b 100644
--- a/perl-Exception-Base.spec
+++ b/perl-Exception-Base.spec
@@ -1,7 +1,7 @@
 #
 # spec file for package perl-Exception-Base
 #
-# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2023 SUSE LLC
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -12,27 +12,29 @@
 # license that conforms to the Open Source Definition (Version 1.9)
 # published by the Open Source Initiative.
 
-# Please submit bugfixes or comments via http://bugs.opensuse.org/
+# Please submit bugfixes or comments via https://bugs.opensuse.org/
 #
 
 
+%define cpan_name Exception-Base
 Name:           perl-Exception-Base
 Version:        0.2501
 Release:        0
-%define cpan_name Exception-Base
+License:        Artistic-1.0 OR GPL-1.0-or-later
 Summary:        Lightweight exceptions
-License:        Artistic-1.0 or GPL-1.0+
-Group:          Development/Libraries/Perl
-Url:            http://search.cpan.org/dist/Exception-Base/
-Source0:        http://www.cpan.org/authors/id/D/DE/DEXTER/%{cpan_name}-%{version}.tar.gz
+URL:            https://metacpan.org/release/%{cpan_name}
+Source0:        https://cpan.metacpan.org/authors/id/D/DE/DEXTER/%{cpan_name}-%{version}.tar.gz
 Source1:        cpanspec.yml
+# PATCH-FIX-UPSTREAM deprecated smartmatch operator https://github.com/dex4er/perl-Exception-Base/issues/5
+Patch0:         fix_perl538.patch
 BuildArch:      noarch
-BuildRoot:      %{_tmppath}/%{name}-%{version}-build
 BuildRequires:  perl
 BuildRequires:  perl-macros
-BuildRequires:  perl(Module::Build)
 BuildRequires:  perl(Test::Unit::Lite) >= 0.12
 %{perl_requires}
+# MANUAL BEGIN
+BuildRequires:  perl(Module::Build)
+# MANUAL END
 
 %description
 This class implements a fully OO exception mechanism similar to
@@ -72,21 +74,21 @@ interface)
   * some defaults (i.e. verbosity) can be different for different exceptions
 
 %prep
-%setup -q -n %{cpan_name}-%{version}
+%autosetup  -n %{cpan_name}-%{version} -p0
 
 %build
-%{__perl} Build.PL installdirs=vendor
-./Build build flags=%{?_smp_mflags}
+perl Build.PL --installdirs=vendor
+./Build build --flags=%{?_smp_mflags}
 
 %check
 ./Build test
 
 %install
-./Build install destdir=%{buildroot} create_packlist=0
+./Build install --destdir=%{buildroot} --create_packlist=0
 %perl_gen_filelist
 
 %files -f %{name}.files
-%defattr(-,root,root,755)
-%doc Changes examples Incompatibilities LICENSE README README.md
+%doc Changes examples Incompatibilities README README.md
+%license LICENSE
 
 %changelog