AT mit Aufruf einer Sub

[Thorsten Pferdekaemper]

Hi,
na so geht das nicht. Du kannst nicht einfach lokale Variablen außerhalb der Funktion ("sub") verwenden. Die Routine  gerade_ungerade_kw() hat bis auf die Log-Ausgabe und dass sie CPU braucht gar keinen Effekt.
Also so:

Code Auswählen Erweitern


sub gerade_ungerade_kw() {
...
my $kw_ung      = $kw % 2; # KW ist gerade: 0 ; KW ist ungerade: 1
Log 1, " KW:$kw | KW ung.:$kw_ung | WDay:$wday" ; # Testausgabe
return $kw_ung;
}

Dann die Verwendung:

Code Auswählen Erweitern


if($wday == 0 && gerade_ungerade_kw()  == 1)

...dann noch das at löschen und im Forum alles sauber in code-Tags verpacken.
Gruß,
    Thorsten

[Chris8888]

Hallo,

jetzt geht mir ein Licht auf!

Ich dachte immer die Variablen wären dann "global" verfügbar.
AT ist gelöscht, CodeTags sind eingefügt, DEF habe ich umgestellt und die Fehlermeldungen sind weg.

DANKE!

VG
Christian