Object / Arrays

[Alex]

hier ist eine kurze Anleitung zum OO-Perl [link href="http://de.selfhtml.org/perl/sprache/objekte.htm"]hier[/link]

müsste dein Thema eigentlich abdecken, oder?

Naja ganz glücklich bin ich damit nicht ;).

In dem Bsp. wird ja mit der VCset Methode, eine neue Variable hinzugefügt, und benannt. Das könnte ich zwar auch mach und mir den namen mit einer internen Zählervariable ersparen, aber das finde ich nicht gerade schön.

Ich suche nache einer Lösung die "so aussieht":

sub addName
{
  $this = shift;
  push( @{ $this -> { array } }, shift );
}

sub getName
{
  $this = shift;
  return pop( @{ $this -> {array } } );
}

denke ich irgendwie umständlich oder so...?!?

lg.

Habe leider nicht mein Perl-Buch zur Seite.

Du suchst aber, wie die Arrays in Perl behandelt werden müssen, oder?