Thread eher allgemeine fragen zu oop (27 answers)
Opened by mark05 at 2010-04-13 11:26

esskar
 2010-04-14 13:23
#136000 #136000
User since
2003-08-04
7321 Artikel
ModeratorIn

user image
Class::Accessor::* kann dir schreibarbeit ersparen

Code (perl): (dl )
__PACKAGE__->mk_accessors(qw/daemon/);


ist ca gleich bedeutend mit

Code (perl): (dl )
1
2
3
4
5

sub daemon {
   my $self = shift;
   $self->{daemon} = $_[0] if @_;
   return $self->{daemon};
}

außerdem spendet es deinem modul gleich eine new funktion mit eingebautem bless.

View full thread eher allgemeine fragen zu oop