make regular expression 5.8 compatible

sni · sni · commit 02f2f8a42fb9 · 2016-04-02T19:53:58.000+02:00
\R was introduced in 5.10 too
diff --git a/lib/Monitoring/Plugin/Functions.pm b/lib/Monitoring/Plugin/Functions.pm
@@ -119,7 +119,7 @@ sub plugin_exit {
     # Setup output
     my $output = "$STATUS_TEXT{$code}";
     if (defined $message && $message ne '') {
-        $output .= " - " unless $message =~ /^\s*\R/mxs;
+        $output .= " - " unless $message =~ /^\s*\n/mxs;
         $output .= $message;
     }
     my $shortname = ($arg->{plugin} ? $arg->{plugin}->shortname : undef);

Original file line number	Diff line number	Diff line change
`@@ -119,7 +119,7 @@ sub plugin_exit {`
`119`	`119`	`# Setup output`
`120`	`120`	`my $output = "$STATUS_TEXT{$code}";`
`121`	`121`	`if (defined $message && $message ne '') {`
`122`		`- $output .= " - " unless $message =~ /^\s*\R/mxs;`
	`122`	`+ $output .= " - " unless $message =~ /^\s*\n/mxs;`
`123`	`123`	`$output .= $message;`
`124`	`124`	`}`
`125`	`125`	`my $shortname = ($arg->{plugin} ? $arg->{plugin}->shortname : undef);`