Wie entstehen diese Log-Einträge?

[stobor]

Hallo,

ich bin gerade etwas überrascht, das ich sehr viele diese Einträge im Log erhalte:

3: HM_HT_Tracker return value: 1

Ich habe mir in der  99_myUtils.pm eine Funktion geschrieben, die mir den Status verschiedener Geräte in eine Datei schreiben soll:

Code Auswählen Erweitern

...
sub logStatus4Heizung($){
my ($sSender) = @_;
my $sAlias = AttrVal($sSender, "alias", AttrVal($sSender, "name", AttrVal($sSender, "NAME", "n.a.")));

my $date = strftime "%a %e.%m.%Y %H.%M.%S", localtime;

my $deviceValues = "$date".
"\t".
"$sAlias".
"\t".
ReadingsVal('HM_TH_Garten','1.TEMPERATURE',0).
"\t".
ReadingsVal('HM_SC_OG_Arbeitszimmer','state',0).
"\t".
ReadingsVal('HM_4CEE23','actuator',0).
"\t".
ReadingsVal('KlimaHWR','temperature',0).
"\n";

open(HEIZUNGSSPAREN, ">>SparTrackingHeizung.txt");

print HEIZUNGSSPAREN "$deviceValues";

close(HEIZUNGSSPAREN);
# geloggt im Verzeichnis opt/fhem
}
...

Die Funktion wird über dieses Ereignis aufgerufen (fhem.cfg):

Code Auswählen Erweitern

...
attr global verbose 3
...
define HM_HT_Tracker notify HM_HT_.*4.VALVE_STATE:.* {\
logStatus4Heizung($NAME);;\
}

Ich kann nicht erkennen, warum das Log mit diesen Meldungen vollläuft:
3: HM_HT_Tracker return value: 1

Hat da jemand einen Tip für mich, warum der Log-Eintrag erscheint und/oder wie ich das unterbinden kann?

Vielen Dank

[OdfFhem]

Die Routine hat kein abschließendes return.
1 ist vermutlich das Ergebnis der close-Anweisung ...

Code Auswählen Erweitern

return '';