Referenz zu Klassen speichern - #98725 (Allgemeines zu Perl)

sid burn

2007-08-27 20:26

User since
2006-03-29
1520 Artikel
BenutzerIn

user image

Das mit dem "bless" sehe ich ja jetzt erst, einen Konstruktur sollte man so schreiben:

Code (perl): (dl )

sub new {
    my ($class, %args) = @_;

    my $hash_href = { %args };
    return bless $hash_href, $class;
}

Dein Konstruktur erlaubt keine Vererbung!

Das ganze kann man natürlich auch verkürzen. ;)

Code (perl): (dl )

sub new { bless { @_[1..$#_] }, $_[0] }

Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de