diff options
author | Sven Nierlein <sven@nierlein.de> | 2016-04-02 19:53:58 +0200 |
---|---|---|
committer | Sven Nierlein <sven@nierlein.de> | 2016-04-02 19:53:58 +0200 |
commit | 02f2f8a42fb976ea04ae8be54b5b027e757cefc3 (patch) | |
tree | 0e33e3ecd77e02c17f2e5b5f2077638f46a8132c /lib/Monitoring | |
parent | 4e3103cb1c39e691bdd7dc16372eaa26ffe7d75e (diff) | |
download | monitoring-plugin-perl-02f2f8a42fb976ea04ae8be54b5b027e757cefc3.tar.gz |
make regular expression 5.8 compatible
\R was introduced in 5.10 too
Diffstat (limited to 'lib/Monitoring')
-rw-r--r-- | lib/Monitoring/Plugin/Functions.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Monitoring/Plugin/Functions.pm b/lib/Monitoring/Plugin/Functions.pm index d8ebdad..93fec5d 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 =~ /^\s*\R/mxs; | 122 | $output .= " - " unless $message =~ /^\s*\n/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); |