Counter innerhalb einer Klasse? - #109349 (Allgemeines zu Perl)

JackBauer

2008-05-07 14:45

User since
2008-04-30
16 Artikel
BenutzerIn
[default_avatar]

Hier geht es weiter: Link

Hi,

wie genau realisiere ich in Perl innerhalb einer Instanz einer Klasse einen Counter?

Bisher habe ich nur mit Getter/Setter Funktionen auf meine Instanzvariablen zugegriffen. Wie kann ich direkt auf die Werte zugreifen?

Mein Ansatz war der folgende:

Code (perl): (dl )

sub count
{
    my $self=shift;
    if (@_) { $self->{count} += shift }
    return $self->{count};
}

So etwas wäre mein Wunsch:

Code (perl): (dl )

1
2

my $value = 5;
$self->counter +=  $value

Gruß

JackBauer

Antworten mit Zitat