FHEM Forum

FHEM => Automatisierung => Thema gestartet von: Wzut am 14 Juli 2020, 07:28:42

Titel: 31_LightScene Patch
Beitrag von: Wzut am 14 Juli 2020, 07:28:42
Ich ärgere mich jedes mal wenn ich eine bestehende LC editiere und danach mein Log mit Meldungen geflutet ist , BSP :
2020.07.13 22:07:04 1: PERL WARNING: Use of uninitialized value in pattern match (m//) at ./FHEM/31_LightScene.pm line 990.
2020.07.13 22:07:04 1: stacktrace:
2020.07.13 22:07:04 1:     main::__ANON__                      called by ./FHEM/31_LightScene.pm (990)
2020.07.13 22:07:04 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:04 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:04 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:04 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:04 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:04 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:04 1: PERL WARNING: Use of uninitialized value $v in concatenation (.) or string at ./FHEM/01_FHEMWEB.pm line 2283.
2020.07.13 22:07:04 1: stacktrace:
2020.07.13 22:07:04 1:     main::__ANON__                      called by ./FHEM/01_FHEMWEB.pm (2283)
2020.07.13 22:07:04 1:     main::FW_textfieldv                 called by ./FHEM/31_LightScene.pm (999)
2020.07.13 22:07:04 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:04 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:04 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:04 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:04 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:04 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:04 1: PERL WARNING: Use of uninitialized value in pattern match (m//) at ./FHEM/31_LightScene.pm line 990.
2020.07.13 22:07:04 1: stacktrace:
2020.07.13 22:07:04 1:     main::__ANON__                      called by ./FHEM/31_LightScene.pm (990)
2020.07.13 22:07:04 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:04 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:04 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:04 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:04 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:04 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:04 1: PERL WARNING: Use of uninitialized value $v in concatenation (.) or string at ./FHEM/01_FHEMWEB.pm line 2283.
2020.07.13 22:07:04 1: stacktrace:
2020.07.13 22:07:04 1:     main::__ANON__                      called by ./FHEM/01_FHEMWEB.pm (2283)
2020.07.13 22:07:04 1:     main::FW_textfieldv                 called by ./FHEM/31_LightScene.pm (999)
2020.07.13 22:07:04 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:04 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:04 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:04 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:04 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:04 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:04 1: PERL WARNING: Use of uninitialized value in pattern match (m//) at ./FHEM/31_LightScene.pm line 990.
2020.07.13 22:07:04 1: stacktrace:
2020.07.13 22:07:04 1:     main::__ANON__                      called by ./FHEM/31_LightScene.pm (990)
2020.07.13 22:07:04 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:04 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:04 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:04 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:04 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:04 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:04 1: PERL WARNING: Use of uninitialized value $v in concatenation (.) or string at ./FHEM/01_FHEMWEB.pm line 2283.
2020.07.13 22:07:04 1: stacktrace:
2020.07.13 22:07:04 1:     main::__ANON__                      called by ./FHEM/01_FHEMWEB.pm (2283)
2020.07.13 22:07:04 1:     main::FW_textfieldv                 called by ./FHEM/31_LightScene.pm (999)
2020.07.13 22:07:04 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:04 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:04 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:04 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:04 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:04 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:04 1: PERL WARNING: Use of uninitialized value in pattern match (m//) at ./FHEM/31_LightScene.pm line 990.
2020.07.13 22:07:04 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/31_LightScene.pm (990)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value $v in concatenation (.) or string at ./FHEM/01_FHEMWEB.pm line 2283.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/01_FHEMWEB.pm (2283)
2020.07.13 22:07:05 1:     main::FW_textfieldv                 called by ./FHEM/31_LightScene.pm (999)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value in pattern match (m//) at ./FHEM/31_LightScene.pm line 990.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/31_LightScene.pm (990)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value $v in concatenation (.) or string at ./FHEM/01_FHEMWEB.pm line 2283.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/01_FHEMWEB.pm (2283)
2020.07.13 22:07:05 1:     main::FW_textfieldv                 called by ./FHEM/31_LightScene.pm (999)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value in pattern match (m//) at ./FHEM/31_LightScene.pm line 990.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/31_LightScene.pm (990)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value $v in concatenation (.) or string at ./FHEM/01_FHEMWEB.pm line 2283.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/01_FHEMWEB.pm (2283)
2020.07.13 22:07:05 1:     main::FW_textfieldv                 called by ./FHEM/31_LightScene.pm (999)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value in pattern match (m//) at ./FHEM/31_LightScene.pm line 990.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/31_LightScene.pm (990)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value $v in concatenation (.) or string at ./FHEM/01_FHEMWEB.pm line 2283.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/01_FHEMWEB.pm (2283)
2020.07.13 22:07:05 1:     main::FW_textfieldv                 called by ./FHEM/31_LightScene.pm (999)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value in pattern match (m//) at ./FHEM/31_LightScene.pm line 990.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/31_LightScene.pm (990)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value $v in concatenation (.) or string at ./FHEM/01_FHEMWEB.pm line 2283.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/01_FHEMWEB.pm (2283)
2020.07.13 22:07:05 1:     main::FW_textfieldv                 called by ./FHEM/31_LightScene.pm (999)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value in pattern match (m//) at ./FHEM/31_LightScene.pm line 990.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/31_LightScene.pm (990)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value $v in concatenation (.) or string at ./FHEM/01_FHEMWEB.pm line 2283.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/01_FHEMWEB.pm (2283)
2020.07.13 22:07:05 1:     main::FW_textfieldv                 called by ./FHEM/31_LightScene.pm (999)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value in pattern match (m//) at ./FHEM/31_LightScene.pm line 990.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/31_LightScene.pm (990)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:05 1: PERL WARNING: Use of uninitialized value $v in concatenation (.) or string at ./FHEM/01_FHEMWEB.pm line 2283.
2020.07.13 22:07:05 1: stacktrace:
2020.07.13 22:07:05 1:     main::__ANON__                      called by ./FHEM/01_FHEMWEB.pm (2283)
2020.07.13 22:07:05 1:     main::FW_textfieldv                 called by ./FHEM/31_LightScene.pm (999)
2020.07.13 22:07:05 1:     main::LightScene_editTable          called by ./FHEM/31_LightScene.pm (199)
2020.07.13 22:07:05 1:     main::LightScene_detailFn           called by ./FHEM/01_FHEMWEB.pm (1515)
2020.07.13 22:07:05 1:     main::FW_doDetail                   called by ./FHEM/01_FHEMWEB.pm (1158)
2020.07.13 22:07:05 1:     main::FW_answerCall                 called by ./FHEM/01_FHEMWEB.pm (590)
2020.07.13 22:07:05 1:     main::FW_Read                       called by fhem.pl (3795)
2020.07.13 22:07:05 1:     main::CallFn                        called by fhem.pl (762)
2020.07.13 22:07:07 3: FBDECT set Flurlicht_EG on


die dafür verantwortliche  Zeile 990 :
if ($hash->{SCENES}{$scn}{$dev} =~ m/^;/) {

Vorschlag den Abschnit etwas umbauen :


my $default = $hash->{SCENES}{$scn}{$dev};
$default //= '';
$setcmd='set';
if ($default =~ m/^;/) {
    $default =~ s/^;//;
    $setcmd='setcmd';
}
$default = $default->{state} if( ref($default) eq 'HASH' );