summaryrefslogtreecommitdiffstats
path: root/lib/Monitoring/Plugin/Functions.pm
diff options
context:
space:
mode:
authorSven Nierlein <sven@nierlein.de>2016-04-02 19:49:11 +0200
committerSven Nierlein <sven@nierlein.de>2016-04-02 19:49:11 +0200
commit4e3103cb1c39e691bdd7dc16372eaa26ffe7d75e (patch)
treeb6950dbbe76da1e6161ddfec309bbbdbfd998ec7 /lib/Monitoring/Plugin/Functions.pm
parentaccf5af1430f48317440943cb114808194b92927 (diff)
downloadmonitoring-plugin-perl-4e3103cb1c39e691bdd7dc16372eaa26ffe7d75e.tar.gz
make regular expression 5.8 compatible
Diffstat (limited to 'lib/Monitoring/Plugin/Functions.pm')
-rw-r--r--lib/Monitoring/Plugin/Functions.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Monitoring/Plugin/Functions.pm b/lib/Monitoring/Plugin/Functions.pm
index 5946c7d..d8ebdad 100644
--- a/lib/Monitoring/Plugin/Functions.pm
+++ b/lib/Monitoring/Plugin/Functions.pm
@@ -119,7 +119,7 @@ sub plugin_exit {
119 # Setup output 119 # Setup output
120 my $output = "$STATUS_TEXT{$code}"; 120 my $output = "$STATUS_TEXT{$code}";
121 if (defined $message && $message ne '') { 121 if (defined $message && $message ne '') {
122 $output .= " - " unless $message =~ /^\h*\R/; 122 $output .= " - " unless $message =~ /^\s*\R/mxs;
123 $output .= $message; 123 $output .= $message;
124 } 124 }
125 my $shortname = ($arg->{plugin} ? $arg->{plugin}->shortname : undef); 125 my $shortname = ($arg->{plugin} ? $arg->{plugin}->shortname : undef);