72_FRITZBOX: Sperren/Entsperren von Netzwerkgeräten / DECT Telefonen u weiteres

[JoWiemann]

Danke für Eure Hinweise.

Mit den Fehlermeldungen meinte ich eher die Perl-Warnungen. Ich habe hier nur den gesamten Block kopiert.

Viele Grüße
Jürgen

Die sind eine Folge der nicht vorhanden Verbindung. Sollte mit der morgigen Version abgefangen sein.

Grüße Jörg

[juemuc]

Hallo Juergen (juemuc),
einen FB reboot kann man in FHEM wie folgt initiieren:

Code Auswählen Erweitern

get FritzBox tr064Command DeviceConfig:1 deviceconfig Reboot

Da ich auch 2FA nutze, ist das leider nur eine Möglichkeit, wenn man in der Nähe der Box ist. Die Box erwartet danach noch ein Druck auf einen Button 
Vielleicht hat Jörg ja noch eine Idee 

Viele Grüße
Jürgen

[JoWiemann]

Vielleicht hat Jörg ja noch eine Idee 

Also nicht mit der Box. Mon könnte aber einen Shelly in die Stromversorgung setzten und einfach den Strom abschalten.

Grüße Jörg

[RalfRog]

...
das ist nur für die Anzeige.
..

War nur ne (blöde) Idee.... 

...
Anbei eine Version, bei der ich hoffe, dass die Perl Fehler abgefangen sind.

Deine 7490 irritiert mich. Aber es scheint wohl eine Zustand zu sein, der eintreten kann.

Ob ich das bei früheren Tests versucht habe weiss ich nicht mehr. An sich macht man es ja eher am Master.

VERSION 07.50.8e

Neu wie angekündigt sehe ich:
"FRITZBOX!0000 [fritzbox: Define.301] - The support for telnet and operation on a Fritz!Box has been discontinued. The functions are disabled."


Die Meldungen stehen direkt im Zusammenhang mit get <name> luaInfo landevices
Nachdem 2h nur gepollt wurde und auch die MAC- und NBH-Reading immer aktualisiert wurden und kurz vorher ohne Fehlermeldung vpnshares abgerufen wurden, kommen die Fehler und das nur einmalig.

Code Auswählen Erweitern


2023.03.01 21:15:58.613 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7493.
....
2023.03.01 21:15:58.657 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7528.

Ne ist leider nicht weg

Code Auswählen Erweitern

2023.03.01 21:25:28.051 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7502.
2023.03.01 21:25:28.055 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7503.
2023.03.01 21:25:28.059 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7504.
2023.03.01 21:25:28.063 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7505.
2023.03.01 21:25:28.067 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7510.
2023.03.01 21:25:28.073 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7537.
2023.03.01 21:25:28.077 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7538.
2023.03.01 21:25:28.081 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7539.
2023.03.01 21:25:28.085 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7540.
2023.03.01 21:25:28.089 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7542.

Zeile 7502 => "$returnStr .= "<td>" . $result->{data}->{active}->[$i]->{mac} . "</td>";"
Was ist denn da uninitialized? {mac}? Kann gerne noch Debug-Code einbauen! (selber fehlt mir die Fantasie, durchblicke diese Hash-Konstrukte nicht)

[RalfRog]

Neben der Antwort vorher habe ich jetzt einfach zum Test mal wieder zurück gerüstet und mal überlegt...
ich habe am MeshClient (genau ja Repeater über LAN) 7490 soweit nix eingestellt und die Daten der 7590 per Mesh übernommen.

Die Antworten der 7590 und 7490 auf die Abfrage
   "get <name> luaData xhr 1 lang de page netDev xhrId cleanup useajax 1 no_sidrenew nop"
sehen ja ziemlich unterschiedlich aus.

Bin daher mir der 7490 wieder zurück auf die 7.29 und da kommt nach Restart der Box und "shutdown restart" FHEM auf
   "get <name> luaData xhr 1 lang de page netDev xhrId cleanup useajax 1 no_sidrenew nop"

Code Auswählen Erweitern

Result of data = 'xhr' => '1'
'lang' => 'de'
'page' => 'netDev'
'xhrId' => 'cleanup'
'useajax' => '1'
'no_sidrenew' => ''
----------------------------------------------------------------------
ERROR: 303 See Other


Die Abfrage "get <name> luaInfo landevices" bringt ebenfalls wie vorher eine leere Tabelle und die gleichen Meldungen "uninitialized".

Code Auswählen Erweitern


2023.03.01 22:43:18.249 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7502.
2023.03.01 22:43:18.253 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7503.
2023.03.01 22:43:18.256 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7504.
2023.03.01 22:43:18.259 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7505.
2023.03.01 22:43:18.262 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7510.
2023.03.01 22:43:18.266 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7537.
2023.03.01 22:43:18.269 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7538.
2023.03.01 22:43:18.273 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7539.
2023.03.01 22:43:18.276 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7540.
2023.03.01 22:43:18.280 1: PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 7542.

Ein erneutes
   "get <name> luaData xhr 1 lang de page netDev xhrId cleanup useajax 1 no_sidrenew nop"
bringt dann wie vorher:

Code Auswählen Erweitern

Result of data = 'xhr' => '1'
'lang' => 'de'
'page' => 'netDev'
'xhrId' => 'cleanup'
'useajax' => '1'
'no_sidrenew' => ''

----------------------------------------------------------------------
$VAR1 = {
          'pid' => 'netDev',
          'hide' => {
                      'dslGraph' => bless( do{\(my $o = 1)}, 'JSON::PP::Boolean' ),
                      'provServ' => $VAR1->{'hide'}{'dslGraph'},
                      'kidLis' => $VAR1->{'hide'}{'dslGraph'},
                      'trafapp' => $VAR1->{'hide'}{'dslGraph'},
                      'liveImg' => $VAR1->{'hide'}{'dslGraph'},
                      'faxSet' => $VAR1->{'hide'}{'dslGraph'},
                      'dyndns' => $VAR1->{'hide'}{'dslGraph'},
                      'shareVpn' => $VAR1->{'hide'}{'dslGraph'},
                      'dslOv' => $VAR1->{'hide'}{'dslGraph'},
                      'dectMoniEx' => $VAR1->{'hide'}{'dslGraph'},
                      'mobile' => $VAR1->{'hide'}{'dslGraph'},
                      'trafprot_edit' => $VAR1->{'hide'}{'dslGraph'},
                      'liveTv' => $VAR1->{'hide'}{'dslGraph'},
                      'shareUsb' => $VAR1->{'hide'}{'dslGraph'},
                      'netCnt' => $VAR1->{'hide'}{'dslGraph'},
                      'portoverview' => $VAR1->{'hide'}{'dslGraph'},
                      'dslSet' => $VAR1->{'hide'}{'dslGraph'},
                      'dectRdio' => $VAR1->{'hide'}{'dslGraph'},
                      'dslStat' => $VAR1->{'hide'}{'dslGraph'},
                      'kidPro' => $VAR1->{'hide'}{'dslGraph'},
                      'dectMoni' => $VAR1->{'hide'}{'dslGraph'},
                      'dslFeed' => $VAR1->{'hide'}{'dslGraph'},
                      'dectMail' => $VAR1->{'hide'}{'dslGraph'},
                      'ssoSet' => $VAR1->{'hide'}{'dslGraph'},
                      'trafprio' => $VAR1->{'hide'}{'dslGraph'},
                      'trafapp_edit' => $VAR1->{'hide'}{'dslGraph'},
                      'rss' => $VAR1->{'hide'}{'dslGraph'},
                      'dslSpec' => $VAR1->{'hide'}{'dslGraph'}
                    },
          'data' => {
                      'nolist' => $VAR1->{'hide'}{'dslGraph'},
                      'backToPage' => 'netDev',
                      'infolink' => 'aa.bb.cc.x',
                      'ispowerline' => bless( do{\(my $o = 0)}, 'JSON::PP::Boolean' ),
                      'ipclient' => $VAR1->{'hide'}{'dslGraph'},
                      'nexusclient' => $VAR1->{'hide'}{'dslGraph'},
                      'isrepeater' => $VAR1->{'data'}{'ispowerline'}
                    },
          'time' => [],
          'sid' => '422a0a5d5723b27a'
        };


Also hat mit der Labor-Version nix zu tun. Umso merkwürdiger das die 7490 bei dir anders reagiert 

[JoWiemann]

Die Antworten der 7590 und 7490 auf die Abfrage
   "get <name> luaData xhr 1 lang de page netDev xhrId cleanup useajax 1 no_sidrenew nop"
sehen ja ziemlich unterschiedlich aus.

Bitte mit:

   "get <name> luaData xhr 1 lang de page netDev xhrId all"

testen.

Die von Dir genutzt "alte" luaData führte bei mir auf der 7490 auch zu einem Fehler. Die neue luaData funktioniert bei mir sowohl auf der 7490 als auch auf der 7590.

Ich vermute mal, dass ich den alten String "gefunden" habe, aber nicht wirklich verrifiziert habe. Bisher hat er jedenfalls funktioniert (jedenfalls bei 7.50).

Grüße Jörg

[RalfRog]

Hi
Ich habe das Kommando "get <name> luaData xhr 1 lang de page netDev xhrId all" in der Lifeumgebung (VERSION  07.50.3) auf der 7490 ausgeführt.

Sieht der anderen Abfrage "get <name> luaData xhr 1 lang de page netDev xhrId cleanup useajax 1 no_sidrenew nop" ziemlich ähnlich / aus meiner Sicht. Vergleich Zeile für Zeile:
   die data-Section ist gleich (nur anders sortiert)
   die hide-Section ist gleich (nur anders sortiert)

Ergebnis (dürfte ja mit 07.50.3 keinen Unterschied machen):

Code Auswählen Erweitern


Result of data = 'xhr' => '1'
'lang' => 'de'
'page' => 'netDev'
'xhrId' => 'all'

----------------------------------------------------------------------
$VAR1 = {
          'pid' => 'netDev',
          'sid' => '0517ad3dca28a2b3',
          'time' => [],
          'hide' => {
                      'provServ' => bless( do{\(my $o = 1)}, 'JSON::PP::Boolean' ),
                      'trafprot_edit' => $VAR1->{'hide'}{'provServ'},
                      'trafapp_edit' => $VAR1->{'hide'}{'provServ'},
                      'trafprio' => $VAR1->{'hide'}{'provServ'},
                      'kidLis' => $VAR1->{'hide'}{'provServ'},
                      'trafapp' => $VAR1->{'hide'}{'provServ'},
                      'liveImg' => $VAR1->{'hide'}{'provServ'},
                      'dectRdio' => $VAR1->{'hide'}{'provServ'},
                      'liveTv' => $VAR1->{'hide'}{'provServ'},
                      'mobile' => $VAR1->{'hide'}{'provServ'},
                      'dectMoni' => $VAR1->{'hide'}{'provServ'},
                      'kidPro' => $VAR1->{'hide'}{'provServ'},
                      'dslGraph' => $VAR1->{'hide'}{'provServ'},
                      'dslOv' => $VAR1->{'hide'}{'provServ'},
                      'netCnt' => $VAR1->{'hide'}{'provServ'},
                      'portoverview' => $VAR1->{'hide'}{'provServ'},
                      'dslSpec' => $VAR1->{'hide'}{'provServ'},
                      'dslStat' => $VAR1->{'hide'}{'provServ'},
                      'dectMoniEx' => $VAR1->{'hide'}{'provServ'},
                      'rss' => $VAR1->{'hide'}{'provServ'},
                      'shareVpn' => $VAR1->{'hide'}{'provServ'},
                      'dslFeed' => $VAR1->{'hide'}{'provServ'},
                      'faxSet' => $VAR1->{'hide'}{'provServ'},
                      'shareUsb' => $VAR1->{'hide'}{'provServ'},
                      'dectMail' => $VAR1->{'hide'}{'provServ'},
                      'dslSet' => $VAR1->{'hide'}{'provServ'},
                      'dyndns' => $VAR1->{'hide'}{'provServ'},
                      'ssoSet' => $VAR1->{'hide'}{'provServ'}
                    },
          'data' => {
                      'nexusclient' => $VAR1->{'hide'}{'provServ'},
                      'infolink' => 'AA.BB.CC.1',
                      'ispowerline' => bless( do{\(my $o = 0)}, 'JSON::PP::Boolean' ),
                      'nolist' => $VAR1->{'hide'}{'provServ'},
                      'ipclient' => $VAR1->{'hide'}{'provServ'},
                      'backToPage' => 'netDev',
                      'isrepeater' => $VAR1->{'data'}{'ispowerline'}
                    }
        };


Die 07.50.3 schmeisst auch bei "get <name> luaInfo landevices" die Fehler ins Log!
(sind vermutlich die gleichen Codezeilen <"$returnStr .= "<td>" . $result->{data}->{active}->[$i]->{mac} . "</td>";">)

Code Auswählen Erweitern


2023.03.02 14:45:33.698 1 : PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 6672.
2023.03.02 14:45:33.700 1 : PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 6673.
2023.03.02 14:45:33.701 1 : PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 6674.
2023.03.02 14:45:33.702 1 : PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 6675.
2023.03.02 14:45:33.703 1 : PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 6680.
2023.03.02 14:45:33.703 1 : PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 6699.
2023.03.02 14:45:33.704 1 : PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 6700.
2023.03.02 14:45:33.705 1 : PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 6701.
2023.03.02 14:45:33.706 1 : PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 6702.
2023.03.02 14:45:33.707 1 : PERL WARNING: Use of uninitialized value in concatenation (.) or string at ./FHEM/72_FRITZBOX.pm line 6704.


[JoWiemann]

Ergebnis (dürfte ja mit 07.50.3 keinen Unterschied machen):

Hallo Ralf,

07.50.3 irritiert mich jetzt. Hast Du schon die aktuelle Version 07.50.8e getestet. Ich hatte versucht diesen Fehler abzufangen. Wenn es wirklich nur die MAC ist, dann muss ich da nochmal ran.

Danke und Grüße Jörg

Und anbei eine 07.50.9 Beta. Da sind jetzt fast alle Sourcen für Telent und WebCM entfernt. Neu ist:
set <name> dect on|off

[RalfRog]

In der Testumgebung hatte ich schon die  07.50.8e aktiv.
Das Kommando was du vorgeschlagen hast mit get luadata ist ja nicht von der Version abhängig.

Ich hab dann in der Life Umgebung mal testhalber get luainfo landevices ausgeführt um zu checken ob das Problem schon vor den Cable Änderungen bestand.

Ich geh jetzt mit der neuen Version wieder in die Testumgebung.

Fazit das beschriebene Problem ist wohl älter aber auf einem MeshClient bishernicht aufgefallen, da man das Kommando dort eher nicht ausführt.

[JoWiemann]

Ich hab dann in der Life Umgebung mal testhalber get luainfo landevices ausgeführt um zu checken ob das Problem schon vor den Cable Änderungen bestand.

Ich geh jetzt mit der neuen Version wieder in die Testumgebung.

Fazit das beschriebene Problem ist wohl älter aber auf einem MeshClient bishernicht aufgefallen, da man das Kommando dort eher nicht ausführt.

Hallo Ralf,

das war eine gute Idee. Hast Du 7490 mal als Hauptbox betrieben und direkt nur als Mesh Repeater?

Meine geliehene war die Hauptbox und ich habe nur umkonfiguriert. Ich muss mal fragen, ob ich die auf Werkseinstellungen zurück setzen kann.

Grüße Jörg

[RalfRog]

Wenn es wirklich nur die MAC ist, dann muss ich da nochmal ran.

Guck dir mal die angemeckerten Codezeilen an.
Das sind alle Zeile wo du die Werte aus dem Hash holst. Für active und passiv.

Die Zeile mit der Mac hatte ich nur als Muster rauskopiert.

Wie gesagt, wenn du on the fly ein Paar Zeilen mit Debug-Info brauchst - ich kann gern noch was in den Code einfügen.

Gruß Ralf

[RalfRog]

Die 7490 war bis vor 2 Jahren meine Hauptbox.
Dann habe ich die 7590 bekommen und die 7490 als MeshRepeater eingesetzt.

Die habe ich aber schon mehrere Male per Werksreset zurück gesetzt und quasi nackt mit Datenübernahme vom Mesh Master wieder ins Netz gehängt.

[RalfRog]

...
Meine geliehene war die Hauptbox und ich habe nur umkonfiguriert. Ich muss mal fragen, ob ich die auf Werkseinstellungen zurück setzen kann.
...

joooo..... wenn die Einsellungen gesichert sind passt das schon. Hatte meine auch mal verliehen und sie mir dann natürlich erst nach einem Werksreset und Übernahme der alten Einstellungen wieder in Netz gehängt. Am Ende weiss man ja als Verleiher nie was denn so beim Anderen passiert ist.

[RalfRog]

Uiiii     my $ModulVersion = "07.50.9 Beta";

Ich glaube da mussst du nochmal gucken. Modul wurde nicht geladen.

Code Auswählen Erweitern


2023.03.02 19:18:17.049 0: Server shutdown
2023.03.02 19:18:22.753 1: Including fhem.cfg
2023.03.02 19:18:25.849 3: WEB: port 8083 opened
2023.03.02 19:18:26.779 2: eventTypes: loaded 530 lines from ./log/eventTypes.txt
2023.03.02 19:18:50.011 3: RalfMqtt: port 1883 opened
2023.03.02 19:18:50.943 1: PERL WARNING: Array found where operator expected at ./FHEM/72_FRITZBOX.pm line 3881, near "Dumper @tr064CallArray"
2023.03.02 19:18:50.947 1: PERL WARNING:        (Do you need to predeclare Dumper?)
2023.03.02 19:18:51.080 1: reload: Error:Modul 72_FRITZBOX deactivated:
Bareword "Dumper" not allowed while "strict subs" in use at ./FHEM/72_FRITZBOX.pm line 3881, <$fh> line 57.
syntax error at ./FHEM/72_FRITZBOX.pm line 3881, near "Dumper @tr064CallArray"
BEGIN not safe after errors--compilation aborted at ./FHEM/72_FRITZBOX.pm line 4630, <$fh> line 57.

2023.03.02 19:18:51.083 0: Bareword "Dumper" not allowed while "strict subs" in use at ./FHEM/72_FRITZBOX.pm line 3881, <$fh> line 57.
syntax error at ./FHEM/72_FRITZBOX.pm line 3881, near "Dumper @tr064CallArray"
BEGIN not safe after errors--compilation aborted at ./FHEM/72_FRITZBOX.pm line 4630, <$fh> line 57.

2023.03.02 19:18:51.223 3: telnetPort: port 7072 opened
2023.03.02 19:18:51.287 1: PERL WARNING: Subroutine FRITZBOX_Log redefined at ./FHEM/72_FRITZBOX.pm line 168, <$fh> line 85.
2023.03.02 19:18:51.295 1: PERL WARNING: Subroutine FRITZBOX_Initialize redefined at ./FHEM/72_FRITZBOX.pm line 189, <$fh> line 85.
2023.03.02 19:18:51.307 1: PERL WARNING: Subroutine FRITZBOX_Define redefined at ./FHEM/72_FRITZBOX.pm line 233, <$fh> line 85.
2023.03.02 19:18:51.314 1: PERL WARNING: Subroutine FRITZBOX_Undefine redefined at ./FHEM/72_FRITZBOX.pm line 294, <$fh> line 85.
2023.03.02 19:18:51.319 1: PERL WARNING: Subroutine FRITZBOX_Delete redefined at ./FHEM/72_FRITZBOX.pm line 311, <$fh> line 85.
2023.03.02 19:18:51.325 1: PERL WARNING: Subroutine FRITZBOX_Rename redefined at ./FHEM/72_FRITZBOX.pm line 322, <$fh> line 85.
2023.03.02 19:18:51.353 1: PERL WARNING: Subroutine FRITZBOX_Attr redefined at ./FHEM/72_FRITZBOX.pm line 336, <$fh> line 85.
2023.03.02 19:18:51.471 1: PERL WARNING: Subroutine FRITZBOX_Set redefined at ./FHEM/72_FRITZBOX.pm line 459, <$fh> line 85.
2023.03.02 19:18:51.522 1: PERL WARNING: Subroutine FRITZBOX_Get redefined at ./FHEM/72_FRITZBOX.pm line 1028, <$fh> line 85.
2023.03.02 19:18:51.551 1: PERL WARNING: Subroutine FRITZBOX_Proof_Params redefined at ./FHEM/72_FRITZBOX.pm line 1203, <$fh> line 85.
2023.03.02 19:18:51.566 1: PERL WARNING: Subroutine FRITZBOX_Readout_Start redefined at ./FHEM/72_FRITZBOX.pm line 1286, <$fh> line 85.
2023.03.02 19:18:51.606 1: PERL WARNING: Subroutine FRITZBOX_API_Check_Run redefined at ./FHEM/72_FRITZBOX.pm line 1350, <$fh> line 85.
2023.03.02 19:18:51.853 1: PERL WARNING: Subroutine FRITZBOX_Readout_Run_Web redefined at ./FHEM/72_FRITZBOX.pm line 1584, <$fh> line 85.
2023.03.02 19:18:51.892 1: PERL WARNING: Subroutine FRITZBOX_Readout_Done redefined at ./FHEM/72_FRITZBOX.pm line 2684, <$fh> line 85.
2023.03.02 19:18:51.925 1: PERL WARNING: Subroutine FRITZBOX_Readout_Process redefined at ./FHEM/72_FRITZBOX.pm line 2707, <$fh> line 85.
2023.03.02 19:18:51.935 1: PERL WARNING: Subroutine FRITZBOX_Readout_Aborted redefined at ./FHEM/72_FRITZBOX.pm line 2887, <$fh> line 85.
2023.03.02 19:18:51.953 1: PERL WARNING: Subroutine FRITZBOX_Readout_Format redefined at ./FHEM/72_FRITZBOX.pm line 2898, <$fh> line 85.
2023.03.02 19:18:51.963 1: PERL WARNING: Subroutine FRITZBOX_Readout_Add_Reading redefined at ./FHEM/72_FRITZBOX.pm line 3002, <$fh> line 85.
2023.03.02 19:18:51.988 1: PERL WARNING: Subroutine FRITZBOX_Set_Cmd_Start redefined at ./FHEM/72_FRITZBOX.pm line 3024, <$fh> line 85.
2023.03.02 19:18:51.999 1: PERL WARNING: Subroutine FRITZBOX_Set_Cmd_Done redefined at ./FHEM/72_FRITZBOX.pm line 3156, <$fh> line 85.
2023.03.02 19:18:52.004 1: PERL WARNING: Subroutine FRITZBOX_Set_Cmd_Aborted redefined at ./FHEM/72_FRITZBOX.pm line 3190, <$fh> line 85.
2023.03.02 19:18:52.028 1: PERL WARNING: Subroutine FRITZBOX_Run_macFilter redefined at ./FHEM/72_FRITZBOX.pm line 3199, <$fh> line 85.
2023.03.02 19:18:52.041 1: PERL WARNING: Subroutine FRITZBOX_Run_rescan_neighborhood redefined at ./FHEM/72_FRITZBOX.pm line 3318, <$fh> line 85.
2023.03.02 19:18:52.110 1: PERL WARNING: Subroutine FRITZBOX_Run_chgProfile redefined at ./FHEM/72_FRITZBOX.pm line 3360, <$fh> line 85.
2023.03.02 19:18:52.145 1: PERL WARNING: Subroutine FRITZBOX_Run_enableVPNshare redefined at ./FHEM/72_FRITZBOX.pm line 3619, <$fh> line 85.
2023.03.02 19:18:52.180 1: PERL WARNING: Subroutine FRITZBOX_Run_lockLandevice redefined at ./FHEM/72_FRITZBOX.pm line 3716, <$fh> line 85.
2023.03.02 19:18:52.347 1: reload: Error:Modul 72_FRITZBOX deactivated:
Bareword "Dumper" not allowed while "strict subs" in use at ./FHEM/72_FRITZBOX.pm line 3881, <$fh> line 85.
syntax error at ./FHEM/72_FRITZBOX.pm line 3881, near "Dumper @tr064CallArray"
BEGIN not safe after errors--compilation aborted at ./FHEM/72_FRITZBOX.pm line 4630, <$fh> line 85.

2023.03.02 19:18:52.350 0: Bareword "Dumper" not allowed while "strict subs" in use at ./FHEM/72_FRITZBOX.pm line 3881, <$fh> line 85.
syntax error at ./FHEM/72_FRITZBOX.pm line 3881, near "Dumper @tr064CallArray"
BEGIN not safe after errors--compilation aborted at ./FHEM/72_FRITZBOX.pm line 4630, <$fh> line 85.

2023.03.02 19:18:53.244 1: PERL WARNING: Subroutine FRITZBOX_Log redefined at ./FHEM/72_FRITZBOX.pm line 168, <$fh> line 114.
2023.03.02 19:18:53.252 1: PERL WARNING: Subroutine FRITZBOX_Initialize redefined at ./FHEM/72_FRITZBOX.pm line 189, <$fh> line 114.
2023.03.02 19:18:53.265 1: PERL WARNING: Subroutine FRITZBOX_Define redefined at ./FHEM/72_FRITZBOX.pm line 233, <$fh> line 114.
2023.03.02 19:18:53.273 1: PERL WARNING: Subroutine FRITZBOX_Undefine redefined at ./FHEM/72_FRITZBOX.pm line 294, <$fh> line 114.
2023.03.02 19:18:53.278 1: PERL WARNING: Subroutine FRITZBOX_Delete redefined at ./FHEM/72_FRITZBOX.pm line 311, <$fh> line 114.
2023.03.02 19:18:53.283 1: PERL WARNING: Subroutine FRITZBOX_Rename redefined at ./FHEM/72_FRITZBOX.pm line 322, <$fh> line 114.
2023.03.02 19:18:53.312 1: PERL WARNING: Subroutine FRITZBOX_Attr redefined at ./FHEM/72_FRITZBOX.pm line 336, <$fh> line 114.
2023.03.02 19:18:53.429 1: PERL WARNING: Subroutine FRITZBOX_Set redefined at ./FHEM/72_FRITZBOX.pm line 459, <$fh> line 114.
2023.03.02 19:18:53.482 1: PERL WARNING: Subroutine FRITZBOX_Get redefined at ./FHEM/72_FRITZBOX.pm line 1028, <$fh> line 114.
2023.03.02 19:18:53.511 1: PERL WARNING: Subroutine FRITZBOX_Proof_Params redefined at ./FHEM/72_FRITZBOX.pm line 1203, <$fh> line 114.
2023.03.02 19:18:53.525 1: PERL WARNING: Subroutine FRITZBOX_Readout_Start redefined at ./FHEM/72_FRITZBOX.pm line 1286, <$fh> line 114.
2023.03.02 19:18:53.564 1: PERL WARNING: Subroutine FRITZBOX_API_Check_Run redefined at ./FHEM/72_FRITZBOX.pm line 1350, <$fh> line 114.
2023.03.02 19:18:53.805 1: PERL WARNING: Subroutine FRITZBOX_Readout_Run_Web redefined at ./FHEM/72_FRITZBOX.pm line 1584, <$fh> line 114.
2023.03.02 19:18:53.843 1: PERL WARNING: Subroutine FRITZBOX_Readout_Done redefined at ./FHEM/72_FRITZBOX.pm line 2684, <$fh> line 114.
2023.03.02 19:18:53.876 1: PERL WARNING: Subroutine FRITZBOX_Readout_Process redefined at ./FHEM/72_FRITZBOX.pm line 2707, <$fh> line 114.
2023.03.02 19:18:53.887 1: PERL WARNING: Subroutine FRITZBOX_Readout_Aborted redefined at ./FHEM/72_FRITZBOX.pm line 2887, <$fh> line 114.
2023.03.02 19:18:53.905 1: PERL WARNING: Subroutine FRITZBOX_Readout_Format redefined at ./FHEM/72_FRITZBOX.pm line 2898, <$fh> line 114.
2023.03.02 19:18:53.915 1: PERL WARNING: Subroutine FRITZBOX_Readout_Add_Reading redefined at ./FHEM/72_FRITZBOX.pm line 3002, <$fh> line 114.
2023.03.02 19:18:53.940 1: PERL WARNING: Subroutine FRITZBOX_Set_Cmd_Start redefined at ./FHEM/72_FRITZBOX.pm line 3024, <$fh> line 114.
2023.03.02 19:18:53.951 1: PERL WARNING: Subroutine FRITZBOX_Set_Cmd_Done redefined at ./FHEM/72_FRITZBOX.pm line 3156, <$fh> line 114.
2023.03.02 19:18:53.957 1: PERL WARNING: Subroutine FRITZBOX_Set_Cmd_Aborted redefined at ./FHEM/72_FRITZBOX.pm line 3190, <$fh> line 114.
2023.03.02 19:18:53.981 1: PERL WARNING: Subroutine FRITZBOX_Run_macFilter redefined at ./FHEM/72_FRITZBOX.pm line 3199, <$fh> line 114.
2023.03.02 19:18:53.994 1: PERL WARNING: Subroutine FRITZBOX_Run_rescan_neighborhood redefined at ./FHEM/72_FRITZBOX.pm line 3318, <$fh> line 114.
2023.03.02 19:18:54.047 1: PERL WARNING: Subroutine FRITZBOX_Run_chgProfile redefined at ./FHEM/72_FRITZBOX.pm line 3360, <$fh> line 114.
2023.03.02 19:18:54.078 1: PERL WARNING: Subroutine FRITZBOX_Run_enableVPNshare redefined at ./FHEM/72_FRITZBOX.pm line 3619, <$fh> line 114.
2023.03.02 19:18:54.107 1: PERL WARNING: Subroutine FRITZBOX_Run_lockLandevice redefined at ./FHEM/72_FRITZBOX.pm line 3716, <$fh> line 114.
2023.03.02 19:18:54.256 1: reload: Error:Modul 72_FRITZBOX deactivated:
Bareword "Dumper" not allowed while "strict subs" in use at ./FHEM/72_FRITZBOX.pm line 3881, <$fh> line 114.
syntax error at ./FHEM/72_FRITZBOX.pm line 3881, near "Dumper @tr064CallArray"
BEGIN not safe after errors--compilation aborted at ./FHEM/72_FRITZBOX.pm line 4630, <$fh> line 114.

2023.03.02 19:18:54.259 0: Bareword "Dumper" not allowed while "strict subs" in use at ./FHEM/72_FRITZBOX.pm line 3881, <$fh> line 114.
syntax error at ./FHEM/72_FRITZBOX.pm line 3881, near "Dumper @tr064CallArray"
BEGIN not safe after errors--compilation aborted at ./FHEM/72_FRITZBOX.pm line 4630, <$fh> line 114.

2023.03.02 19:18:57.980 1: Including ./log/fhem.save
2023.03.02 19:18:59.024 1: Messages collected while initializing FHEM:configfile: Cannot load module FRITZBOX
setuuid: Please define fritzbox first
Cannot load module FRITZBOX
setuuid: Please define fritzclient first
Cannot load module FRITZBOX
setuuid: Please define fritzkat first
SecurityCheck:
  telnetPort is not password protected
  WEB is not password protected

Protect this FHEM installation by configuring the allowed device allowed
You can disable this message with attr global motd none
Autosave deactivated
2023.03.02 19:19:44.813 0: Featurelevel: 6.2
2023.03.02 19:19:44.827 0: Server started with 18 defined entities (fhem.pl:27110/2023-01-23 perl:5.032001 os:linux user:fhem pid:1069)

[code]

[JoWiemann]

Uiiii     my $ModulVersion = "07.50.9 Beta";

Ich glaube da mussst du nochmal gucken. Modul wurde nicht geladen.

Hallo Ralf,

na gut, anbei die nächste Version:  = "07.50.9a Beta"

Grüße

Jörg