Opened by docsnyder at 2006-01-17 11:14
User since
2003-08-04
12208 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12208 Artikel
Admin1
Code: (dl
)
1
2
3
4
5
sub new {
my ($class, @array) = @_;
my $self = { array => \@array };
bless $self, $class;
}du kannst aber auch prima $self als ein array-objekt anlegen, wenn
du lust hast.\n\n
<!--EDIT|pq|1137491160-->
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem