diff --git a/fhem/FHEM/01_FHEMWEB.pm b/fhem/FHEM/01_FHEMWEB.pm
index 07efc0aa6..de4ff0b05 100644
--- a/fhem/FHEM/01_FHEMWEB.pm
+++ b/fhem/FHEM/01_FHEMWEB.pm
@@ -2787,7 +2787,7 @@ FW_dev2image($;$)
   my (undef, $rstate) = ReplaceEventMap($name, [undef, $state], 0);
 
   my ($icon, $rlink);
-  if(defined($devStateIcon) && $devStateIcon =~ m/^{.*}$/) {
+  if(defined($devStateIcon) && $devStateIcon =~ m/^{.*}$/s) {
     my ($html, $link) = eval $devStateIcon;
     Log3 $FW_wname, 1, "devStateIcon $name: $@" if($@);
     return ($html, $link, 1) if(defined($html) && $html =~ m/^<.*>$/s);
diff --git a/fhem/fhem.pl b/fhem/fhem.pl
index b23aab9b9..854f9ba42 100755
--- a/fhem/fhem.pl
+++ b/fhem/fhem.pl
@@ -2853,7 +2853,7 @@ CommandAttr($$)
     if($ra{$attrName}) {
       my ($lval,$rp,$cache) = ($attrVal, $ra{$attrName}{p}, $ra{$attrName}{c});
 
-      if($rp && $lval =~ m/$rp/) {
+      if($rp && $lval =~ m/$rp/s) {
         my $err = perlSyntaxCheck($attrVal, %{$ra{$attrName}{pv}});
         return "attr $sdev $attrName: $err" if($err);