diff --git a/perl-Nagios-Plugin.changes b/perl-Nagios-Plugin.changes
index c65c52f..f3391ed 100644
--- a/perl-Nagios-Plugin.changes
+++ b/perl-Nagios-Plugin.changes
@@ -1,3 +1,8 @@
+-------------------------------------------------------------------
+Thu Aug 27 10:20:20 UTC 2015 - hsk@imb-jena.de
+
+- fix test to work with perl-5.22
+
 -------------------------------------------------------------------
 Tue Sep 23 19:32:49 UTC 2014 - lars@linux-schulserver.de
 
diff --git a/perl-Nagios-Plugin.spec b/perl-Nagios-Plugin.spec
index 2e4a29b..fa60fda 100644
--- a/perl-Nagios-Plugin.spec
+++ b/perl-Nagios-Plugin.spec
@@ -26,6 +26,7 @@ License:        Artistic-1.0 or GPL-2.0+
 Group:          Development/Languages/Perl
 Url:            http://search.cpan.org/perldoc?Nagios%3A%3APlugin
 Source:         %cpan_name-%{version}.tar.gz
+Patch0:         perl522.patch
 BuildRequires:  perl
 BuildRequires:  perl-macros
 BuildRequires:  perl(Class::Accessor)
@@ -53,6 +54,7 @@ developers to create plugins that conform the Nagios Plugin guidelines
 
 %prep
 %setup -q -n %cpan_name-%{version}
+%patch0 -p2
 
 %build
 perl Makefile.PL OPTIMIZE="%{optflags} -Wall"
diff --git a/perl522.patch b/perl522.patch
new file mode 100644
index 0000000..f37b43f
--- /dev/null
+++ b/perl522.patch
@@ -0,0 +1,11 @@
+--- a/Nagios-Plugin-0.36/t/Nagios-Plugin-Functions-01.t	2010-12-03 12:46:21.000000000 +0100
++++ b/Nagios-Plugin-0.36/t/Nagios-Plugin-Functions-01.t	2015-08-27 12:16:13.649140550 +0200
+@@ -19,7 +19,7 @@
+ is(get_shortname, "NAGIOS-PLUGIN-FUNCTIONS-01", "get_shortname ok");
+ 
+ # Hardcoded checks of constants
+-ok(defined %ERRORS, '%ERRORS defined');
++ok(%ERRORS, '%ERRORS defined');
+ is(OK,          $ERRORS{OK},            "OK        => $ERRORS{OK}");
+ is(WARNING,     $ERRORS{WARNING},       "WARNING   => $ERRORS{WARNING}");
+ is(CRITICAL,    $ERRORS{CRITICAL},      "CRITICAL  => $ERRORS{CRITICAL}");