[Gelöst] Raum- und Geräteliste in Perl

[mk2001]

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.:

Code Auswählen Erweitern

my @rooms = fhemGetRoomList();

Vielen Dank
Mit freundlichen Grüßen
Marcus

[CoolTux]

devspec2array

[igami]

Hatte ich vor einiger Zeit auch schon mal nach gesucht und mir dann selbst was geschrieben.

Code Auswählen Erweitern


sub get_rooms {
  my @rooms;
  push(@rooms, split(",", AttrVal($_, "room", "Unsorted")))
    foreach (devspec2array(".+"));
 
  my %rooms = map{$_, 1} @rooms;
  return(sort(keys %rooms));
}


[mk2001]

@igami: Danke dir! Genau solch eine Funktion habe ich gesucht.