Auf lokale Variablen global zugreifen - #98371 (Graphische Oberflächen)

topeg

2007-08-18 23:40

User since
2006-07-10
2611 Artikel
BenutzerIn

user image

Code (perl): (dl )

sub Speicher_aktualisieren($$$$)
{
  # Variablenwerte übernehmen:
  my ($auswahl_chkb1,$auswahl_chkb2,$auswahl_chkb3,$auswahl_chkb4)=@_;
  # ...
  # weiter wie bisher
}

Der Aufruf:

Code (perl): (dl )

Speicher_aktualisieren($auswahl_chkb1,$auswahl_chkb2,$auswahl_chkb3,$auswahl_chkb4)

Über gib den Inhalt Variablen an die Funktion. Du brauchst keine globalen Variablen zu verwenden.

EDIT:
Ach etwas habe ich übersehen. Wenn Werte wieder zurückgegeben werden sollen kann man da so machen:

Code (perl): (dl )

sub Speicher_aktualisieren($$$$)
{
  # Variablenwerte übernehmen:
  my ($auswahl_chkb1,$auswahl_chkb2,$auswahl_chkb3,$auswahl_chkb4)=@_;
  # ...
  # weiter wie bisher
  # ...
  #Werte rurückgeben:
  return ($auswahl_chkb1,$auswahl_chkb2,$auswahl_chkb3,$auswahl_chkb4,$summe);
}

Der Aufruf dann:

Code (perl): (dl )

($auswahl_chkb1,$auswahl_chkb2,$auswahl_chkb3,$auswahl_chkb4,$summe)=Speicher_aktualisieren($auswahl_chkb1,$auswahl_chkb2,$auswahl_chkb3,$auswahl_chkb4)