diff options
| author | Sven Nierlein <sven@nierlein.de> | 2016-04-02 19:49:11 +0200 |
|---|---|---|
| committer | Sven Nierlein <sven@nierlein.de> | 2016-04-02 19:49:11 +0200 |
| commit | 4e3103cb1c39e691bdd7dc16372eaa26ffe7d75e (patch) | |
| tree | b6950dbbe76da1e6161ddfec309bbbdbfd998ec7 | |
| parent | accf5af1430f48317440943cb114808194b92927 (diff) | |
| download | monitoring-plugin-perl-4e3103cb1c39e691bdd7dc16372eaa26ffe7d75e.tar.gz | |
make regular expression 5.8 compatible
| -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 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); |