Zitat von: seayak am 27 Juni 2025, 14:04:26minimal mögliche Intervallzeiten gesetztTypischer Anfängerfehler - damit legt man sein System ziemlich lahm.
ZitatIrgendwas ist generell kaputt gegangen mit dem Update auf v1.53.0Kaputt ist sicherlich nichts. Welche Version hattest du vorher? Hast du die Updates der Weiterentwicklungen immer mitgemacht?
Result of data = 'xhr' => '1'
'lang' => 'de'
'page' => 'energy'
'xhrId' => 'all'
----------------------------------------------------------------------
{
'sidNew' => 0,
'data' => {
'intro' => {
'text' => [
'Auf dieser Seite finden Sie Informationen zum Energieverbrauch der FRITZ!Box und zu belegten LAN-Schnittstellen.'
]
},
'drain' => [
{
'actPerc' => 29,
'name' => 'FRITZ!Box Gesamtsystem',
'statuses' => 'aktiv seit 4 Tagen, 8 Stunden, 25 Minuten',
'cumPerc' => 29
},
{
'statuses' => '125 MHz Systemtakt',
'cumPerc' => 69,
'name' => 'FRITZ!Box Hauptprozessor',
'actPerc' => 71
},
{
'cumPerc' => 57,
'statuses' => [
'WLAN aktiviert',
"3 WLAN-Netzwerkger\x{c3}\x{a4}te angemeldet"
],
'name' => 'WLAN',
'actPerc' => 57
},
{
'actPerc' => 0,
'name' => "analoge FON-Anschl\x{c3}\x{bc}sse",
'cumPerc' => 0,
'statuses' => ''
},
{
'statuses' => "kein USB-Ger\x{c3}\x{a4}t angeschlossen",
'cumPerc' => 2,
'name' => "USB-Ger\x{c3}\x{a4}te",
'actPerc' => 2
},
{
'lan' => [
{
'name' => 'LAN 1',
'class' => 'green'
},
{
'name' => 'LAN 2',
'class' => 'green'
},
{
'class' => '',
'name' => 'LAN 3'
},
{
'name' => 'LAN 4',
'class' => 'green'
}
],
'statuses' => "3 Ger\x{c3}\x{a4}te angeschlossen",
'name' => "LAN-Anschl\x{c3}\x{bc}sse"
}
]
},
'hide' => {
'liveTv' => bless( do{\(my $o = 1)}, 'JSON::PP::Boolean' ),
'ssoSet' => $VAR1->{'hide'}{'liveTv'},
'shareUsb' => $VAR1->{'hide'}{'liveTv'},
'rrd' => $VAR1->{'hide'}{'liveTv'}
},
'sid' => 'f8e964870bf73ec1',
'time' => [],
'timeTillLogout' => '1200',
'pid' => 'energy'
}
Du darfst diesen Dateianhang nicht ansehen.Du darfst diesen Dateianhang nicht ansehen.###############################################################################
#
# Save this file as 99_mySolarForecastUtils.pm, and create your own functions
# in the new file. They are then available in every Perl expression.
#
###############################################################################
package main;
use strict;
use warnings;
sub
mySolarForecastUtils_Initialize($$)
{
my ($hash) = @_;
}
###############################################################################
#
# Datei Start
#
###############################################################################
Eigene Perl Code Funktionen eintragen
###############################################################################
#
# Datei Ende
#
###############################################################################
1;