Getter/Setter

[hotti]

Moin Moin!

Schon hier beginnt OOP: Zum Exportieren muss Deine package von der Superklasse Exporter erben: require Exporter; und ist dann selbst ein Exporter mit @ISA = qw(Exporter);.

Cargo cult!

Schön dass Du hier bist.

4. Ja, die Exporter-Dokumentation ist noch voll von dem Vererbungs-Unsinn. Leider. Bug!

Zeit für neue Bücher meinerseits. Und ein neues Perl werde ich mir auch installieren. Und umdenken in manchen Sachen, dank Deiner Hilfe, ja freilich.

Btw., ich bin mittlerweile auch mit {RaiseError => 1} und dem Exception-Model in Perl schon viel weiter gekommen, auch dank Deiner Hinweise und eigener Erfahrung: Heute morgen hatte ich tatsächlich einen kleinen TippFehler, qw() anstelle qq() und damit ein ungültiges Statement, wo mir eine Abfrage DBI::errstr drei Zeilen weiter nüscht mehr nützte ;)

Ergo: Mögliche Exceptions sauber auffangen und alles wird gut.

Achja, nochwas zum Organisieren der Trenung von fetch* und Darstellung der Daten betrf. kleinerer Datenmengen im RAM, schöne Lösung mit einer Callbackfunktion:

  
		while( my $ref = $sth->fetchrow_arrayref){  
			$self->{CBK}($ref);		  
		}  

Hotti