FHEM Forum

FHEM => Anfängerfragen => Thema gestartet von: mk2001 am 19 August 2017, 00:04:47

Titel: [Gelöst] Raum- und Geräteliste in Perl
Beitrag von: mk2001 am 19 August 2017, 00:04:47
Hallo,

ich wollte in Perl eine Funktion bauen, in der ich die Räume und der darin enthaltenen Geräte benätige.
Gibt es eine Funktion in Perl welche ich aufrufen kann, um an die vorhandnen Räume zu kommen?

So was z.B.:
my @rooms = fhemGetRoomList();

Vielen Dank
Mit freundlichen Grüßen
Marcus
Titel: Antw:Raum- und Geräteliste in Perl
Beitrag von: CoolTux am 19 August 2017, 00:20:28
devspec2array
Titel: Antw:Raum- und Geräteliste in Perl
Beitrag von: igami am 19 August 2017, 06:47:54
Hatte ich vor einiger Zeit auch schon mal nach gesucht und mir dann selbst was geschrieben.

sub get_rooms {
  my @rooms;
  push(@rooms, split(",", AttrVal($_, "room", "Unsorted")))
    foreach (devspec2array(".+"));
 
  my %rooms = map{$_, 1} @rooms;
  return(sort(keys %rooms));
}
Titel: Antw:Raum- und Geräteliste in Perl
Beitrag von: mk2001 am 19 August 2017, 12:05:52
@igami: Danke dir! Genau solch eine Funktion habe ich gesucht.