PERL: Gerätenamen dynamisch "zusammenbauen"

[NehCoy]

Hallo!

Ist es möglichen den Gerätenamen in Perl dynamisch "zusammenzubauen"?
Pseudocode:;

Code Auswählen Erweitern


sub
Test($)
{
   my $adresse=@_;
   fhem("set KNX_010200##$adresse on");
}

Danke & Grüße
NehCoy

[rudolfkoenig]

Klar.
FHEM erlaubt aber # nicht im Namen.
Bitte weglassen.

[NehCoy]

Hallo!

Vielen Dank für die schnelle Antwort!
Wie? Nur:

Code Auswählen Erweitern

sub
Test($)
{
   my $adresse=@_;
   fhem("set KNX_010200$adresse on");
}
?

Muss ich gleich mal daheim testen!

Danke & Grüße
Neh Coy

BTW:
"##" ist der "Glue Operator" bei C

[rudolfkoenig]

Btw:

Code Auswählen Erweitern

   my $adresse=@_;
ist vermutlich falsch (ungetestet), weil $adresse damit die Anzahl der Funktionsparameter enthaelt. Richtig ist mAn:

Code Auswählen Erweitern

   my ($adresse)=@_;

[elle]

Oder

Code Auswählen Erweitern


my $addresse = shift;


Gruss

/elle

[NehCoy]

Code Auswählen Erweitern

   my ($adresse)=@_;

Ja, danke! Richtig. Funktioniert!