Thread Wann startet ein END Block (30 answers)
Opened by Escape at 2010-01-06 16:02

sid burn
 2010-01-06 17:26
#130161 #130161
User since
2006-03-29
1520 Artikel
BenutzerIn

user image
Der BEGIN Block wird relativ häufig genutzt, auch wenn es mehr versteckt ist.
Jedes Modul das man mit "use" lädt wird mit einem "BEGIN" Block sozusagen "umschlossen". Das bedeutet sämtlicher Code wird auch ausgeführt.

Auch kann ein BEGIN wichtig sein wenn man sachen setzen möchte, z.B. Variablen noch bevor ein Modul geladen wird. Ohne BEGIN Block werden Variablen erst nach dem Laden gesetzt.

Grundsätzlich wenn man aber halbwegs Modern arbeitet trifft man soetwas in der regel nicht mehr an.

Ansonsten kann das ganze noch in Einzeilnern nett sein.

Code: (dl )
perl -pe ' BEGIN { print "Header....\n" } s/asd/wer/g; END { print "Ende...\n" } '

Mit diesem Beispiel kann man z.B. einmalig zu beginn etwas ausführen, und einmalig am ende. Zum Beispiel ein Header/Footer hinzufügen während danach jede Programmzeile mit der Regex bearbeitet wird.

Für "CHECK" oder "INIT" hatte ich auch mal ein Beispiel, weiß aber nicht mehr den genauen zusammenhang.
Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de

View full thread Wann startet ein END Block