Thread Perl OOP
(12 answers)
Opened by sid burn at 2006-09-21 19:24
Danke dir.
War ja letztendlich einfacher als erwartet. Ich dachte schon das wäre mit Perl nicht möglich. Ich habe es jetzt so gemacht und in "user::name" und "user::password" einfach ein "use overload '""' => \&get" hinzugefügt. Damit konnte ich einfach "$anne->name" schreiben und habe den benutzer string zurück bekommen. In der Klasse "user" habe ich dann die Methode "name", "password" angepasst wie du es gesagt hast. Wenn also noch etwas in @_ steht wird einfach "$self->{name}->set(@_)" aufgerufen. Jetzt läuft das so wie erwartet. ich finde das ist aber immer noch eine Menge was man da Schreiben muss. Denke aber da wird man bestimmt was mit eval() Automatisieren können. So das die einzelnen Klassen und get/set Methoden automatisch angelegt werden. Dein genanntes Modul werde ich mir auch nochmal anschauen. :)\n\n <!--EDIT|sid burn|1158856791--> Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de
|