Opened by BratHering at 2005-11-27 16:12
User since
2005-04-13
625 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-04-13
625 Artikel
BenutzerIn
Ich denke mal, dein verständnissproblem liegt bei use base.
Mit use base qw/package/; erbst du von package und lädst es auch gleichzeitig mit require.
Deshalb, da du ja erbst, kannst du auch über das ganz normale Objekt, das zu deinem package gehört auf alle subs in package zugreifen.
for details: perldoc base
Mit use base qw/package/; erbst du von package und lädst es auch gleichzeitig mit require.
Deshalb, da du ja erbst, kannst du auch über das ganz normale Objekt, das zu deinem package gehört auf alle subs in package zugreifen.
for details: perldoc base
perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="5065726c2d436f6d6d756e697479"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"'
http://perl-tutor.de
http://perl-tutor.de