use verzögert ausführen: geht das? - #84708 (Allgemeines zu Perl)

Crian

2004-07-22 11:50

User since
2003-08-04
5866 Artikel
ModeratorIn

Danke für die vielen Lösungsvorschläge.

Initialisierung in new scheidet aus, da die Daten für alle Objekte gleich sind (werden nur gelesen) und deshalb zur Klasse und nicht zum Objekt gehören. Allerdings könnte ich natürlich eine globale Variable haben, die angibt, ob schon eingelesen wurde oder nicht und wenn nicht einlesen.

Interessant finde ich allerdings die Lösung mit der sub import. Ist das ein Sprachmittel, oder kann ich jede Funktion x im Modul M mit x M; starten? Ich denke mal nicht, oder?

Edit: Ist es bei dieser Lösung

Code: (dl )

BEGIN {
   # handle parameters
}
use My::Module;

entscheidend, dass der BEGIN Block vor dem use ist? Jaja, ich probiers ja gleich aus ;-)\n\n

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite