Opened by mark05 at 2020-03-27 11:06
User since
2006-01-27
3890 Artikel
HausmeisterIn
2006-01-27
3890 Artikel
HausmeisterIn
Mit
findet doch keine Vererbung im Sinne der OO statt.
Da wird eine Funktion benannt, die dann in den Namensraum des Aufrufers exportiert wird und dort direkt verfügbar ist.
Das ist keine Vererbung.
Addendum 1:
Und der Absatz
enthält auch keine Vererbung.
Erst wird die importierte Funktion out() aufgerufen.
Dann wird die Funktion setopt() des Namensraum OOTest::Out aufgerufen.
Danach wieder die importierte Funktion out().
Last edited: 2020-03-27 11:53:11 +0100 (CET)
Code: (dl
)
1
2
3
4
require Exporter;
use Exporter qw(import);
use base qw(Exporter);
our @EXPORT_OK = qw(out);
findet doch keine Vererbung im Sinne der OO statt.
Da wird eine Funktion benannt, die dann in den Namensraum des Aufrufers exportiert wird und dort direkt verfügbar ist.
Das ist keine Vererbung.
Addendum 1:
Und der Absatz
Code: (dl
)
1
2
3
4
# vererbt
out ("hello world\n");
OOTest::Out::setopt ( 'debug', '1' );
out ("hello world\n");
enthält auch keine Vererbung.
Erst wird die importierte Funktion out() aufgerufen.
Dann wird die Funktion setopt() des Namensraum OOTest::Out aufgerufen.
Danach wieder die importierte Funktion out().
Last edited: 2020-03-27 11:53:11 +0100 (CET)
meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!