[erledigt] Frage zur "Event-Variable"

[juemuc]

Hallo,

Über die Ereignissteuerung wird ja die Variable $EVENT und $EVPARTn mit n=0 - .. zur Verfügung gestellt. Nun habe ich das Problem, das in einem Fall nur $EVPART0 und $EVPART1 und in einem anderen Fall auch $EVPART2 und $EVPART3 gefüllt sind. Wenn diese nicht gefüllt sind, stehen sie auch nicht zur Verfügung.
Wie kann ich nun alle Infos aus der Variablen $EVENT zur Verfügung stellen, die nach $EVPART0 enthalten sind?

Bsp.: aus dem Event-Monitor: Fritzbox sip2_+1234567890: not in use oder
                                            Fritzbox sip2_+1234567890: active


Viele Grüße

[betateilchen]

$EVENT einfach selbst splitten, dann weißt Du, wieviele Elemente enthalten sind.

Code Auswählen Erweitern


my @EVTPART = split(/ /,$EVENT);
my $anzahl = @EVTPART;


Auf die einzelnen Elemente kannst Du dann mit $EVTPART[0] bis $EVTPART[$anzahl-1] zugreifen.

[juemuc]

Hallo betateilchen,

auf eine ähnliche Idee war ich auch schon gekommen. Allerdings wollte ich einfach den Part "$EVTPART0" löschen. Siehe auch https://forum.fhem.de/index.php/topic,132476.0.html

Hast Du da einen Tipp für mich?

Viele Grüße
Jürgen

[betateilchen]

Mach doch bitte nicht zu jeder Deiner Fragen mehrere Threads auf, das macht überhaupt keinen Spaß, wenn man Dir helfen möchte und man immer erst kreuz und quer suchen muss, wo Du was geschrieben hast.

[betateilchen]

Allerdings wollte ich einfach den Part "$EVTPART0" löschen.
...
Hast Du da einen Tipp für mich?

Klar. Nimm das bereits erwähnte array, entferne das erste Element und baue aus dem restliche array wieder einen String zusammen.

Code Auswählen Erweitern


my @evt = split(/ /,$EVENT);
shift @evt;
return join(" ",@evt);


[juemuc]

Mach doch bitte nicht zu jeder Deiner Fragen mehrere Threads auf, das macht überhaupt keinen Spaß, wenn man Dir helfen möchte und man immer erst kreuz und quer suchen muss, wo Du was geschrieben hast.

Kann ich verstehen. Waren für mich am Anfang aber erst einmal 2 unterschiedliche Themen. Hier als Frage zur Variablen "EVENT" und im zweiten Thread Fragen zu Perl.
Das Ersetzen-Thema  benötige ich aber auch noch in abgewandelter Form. Kann ich in Perl nicht in einem String einen Wert suchen und ersetzen, der in einer Variablen steht?
Das Thema mit der Variable "EVENT" ist hier eigentlich mit Deinen Infos erledigt. Danke hierfür.


Viele Grüße
Jürgen.

[betateilchen]

Kann ich in Perl nicht in einem String einen Wert suchen und ersetzen, der in einer Variablen steht?

Doch, das geht natürlich.
Aber ausgerechnet die Variablen $EVENT und $EVTPARTx sind keine normalen perl Variablen, sondern eine FHEM Spezialität.

[juemuc]

Hallo Betateilchen,

auch mit diesen "Variablen" hat es funktioniert, wenn man vorher die "Perl-Besonderheiten" beachtet. In meinem Testfall war dummerweise ein "+" enthalten.

Viele Grüße
Jürgen