diff --git a/fhem/FHEM/55_GDS.pm b/fhem/FHEM/55_GDS.pm
index d00ec63cb..c7cfb2e70 100644
--- a/fhem/FHEM/55_GDS.pm
+++ b/fhem/FHEM/55_GDS.pm
@@ -39,6 +39,8 @@ use XML::Simple;
 use HttpUtils;
 require LWP::UserAgent;
 
+no if $] >= 5.017011, warnings => 'experimental';
+
 my ($bulaList, $cmapList, %rmapList, $fmapList, %bula2bulaShort, %bulaShort2dwd, %dwd2Dir, %dwd2Name,
 	$alertsXml, %capCityHash, %capCellHash, $sList, $aList);
 
diff --git a/fhem/FHEM/55_InfoPanel.pm b/fhem/FHEM/55_InfoPanel.pm
index cc890974c..cb7c3acf9 100644
--- a/fhem/FHEM/55_InfoPanel.pm
+++ b/fhem/FHEM/55_InfoPanel.pm
@@ -72,7 +72,7 @@ my @valid_halign = qw(start middle end);
 
 my $useImgTools = 1;
 
-no if $] >= 5.017011, warnings => 'experimental::smartmatch';
+no if $] >= 5.017011, warnings => 'experimental';
 
 sub btIP_Define;
 sub btIP_Undef;
diff --git a/fhem/contrib/98_openweathermap.pm b/fhem/contrib/98_openweathermap.pm
index ee1f27dcf..9faf75c85 100644
--- a/fhem/contrib/98_openweathermap.pm
+++ b/fhem/contrib/98_openweathermap.pm
@@ -74,6 +74,8 @@ use XML::Simple;
 eval {require JSON};
 use feature qw/say switch/;
 
+no if $] >= 5.017011, warnings => 'experimental';
+
 require LWP::UserAgent;			# test
 my	$ua = LWP::UserAgent->new;	# test
 	$ua->timeout(10);				# test