diff --git a/fhem/fhem.pl b/fhem/fhem.pl index e963e9cca..c99d6efc6 100755 --- a/fhem/fhem.pl +++ b/fhem/fhem.pl @@ -6402,7 +6402,7 @@ CheckRegexp($$) my $warn; my $osig = $SIG{__WARN__}; - $SIG{__WARN__} = sub { $warn = @_[0]}; + $SIG{__WARN__} = sub { $warn = $_[0]}; eval { "Hallo" =~ m/^$re$/ }; $SIG{__WARN__} = $osig;