Hallo,
ich möchte mir regelmäßig bestimmte Events gesammelt schicken lassen. Dafür habe ich in einem Sub erstellt.
sub Telegram_test {
my $countiesName;
my @macArray = ("_name");
my $hash = $defs{"coronaSpreadCounties"};
while (($countiesName) = each($hash->{READINGS})){
if ($countiesName =~ '_name') {
if (!(grep { $_ =~ /$countiesName/ } @macArray)){
my $countiesID=(split("_",$countiesName))[0];;
my $countiesName_Val = ReadingsVal("coronaSpreadCounties",$countiesName,"");;
my $Reading7cases = $countiesID."_cases7_per_100k";;
my $cases7_Val = ReadingsVal("coronaSpreadCounties",$Reading7cases,"");;
my $cases7_Val_short = sprintf("%.3f",$cases7_Val);;
$cases7_Val_short =~ s/\./,/g;;
my $ReadingNamePercentage = $Reading7cases."_Percentage";;
my $Percentage_Val = ReadingsVal("coronaSpreadCounties",$ReadingNamePercentage,"");;
fhem("set Telegram msg $countiesName_Val: $cases7_Val_short \n$Percentage_Val");;
}
}
}
}
Es werden die benötigten Readings eingeholt und für jeden durchlauf ein Event erstellt.
Wie bekomme ich es hin, dass am Ende alle zusammen in einer Message versendet werden?
Das wäre der Output von einem durchlauf:
SK Stuttgart: 71,551
+4,598