Re: [PERL] Array i klasse

[Peter Makholm <sslug@sslug>]

Jan Eggert Kofoed <sslug@sslug> writes:

> Må jeg lige igen spørge til, hvordan jeg kan bestemme størrelsen af
> arrayet $class->{groups}.

Ehhh, du mener $self->{groups}, ikke?

Du kan opfatte @{$self->{groups}} som et helt almindeligt array. Altså
kan du enten sige 'scalar @{$self->{groups}}' for at få antallet af
argumenter eller '$#{$self->{groups}}' for at få det sidste index i
arrayet.

>      print FH "element zero of groups: "
>      .$album->{groups}->[0]->name()."\n";

ehhh, 'information hiding'. Lav nogle accesor-funktioner

>      print FH "size of rArray: ".scalar(@$rArray)."\n";
>      print FH "size of groups: ".scalar($album->{groups})."\n";

Som sagt ovenfor, så er det 'scalar @{$album->{groups}}' du er
interesseret i. $album->{groups} er en reference der skal derefereres
jvf. 'perldoc perlref'.

-- 
 Peter Makholm     |              I have no caps-lock but I must scream...
 sslug@sslug |                                               -- Greg
 http://hacking.dk |