Object Referenz verschachteln

[Chrisi]

Hi,

Anonyme Hashs grundsätzlih in geschweite Klammern schreiben:

Ok neuer Versuch:

sub new {  
  
    my $class = shift;  
  
    my $self = {  
        _test => 'wert',  
        _bin => (  
            'rm' => '/bin/rm',  
            'cp' => '/bin/cp'  
        )  
    };  
  
    bless $self,$class;  
    return $self;  
  
}  
  
sub test {  
  
    my $self = shift;  
  
    print "Klappt: " . $self->{'_test'};  
    print "Klappt nicht: " . $self->{'_bin'}->{'xm'};  
  
}

Die geschweiften Klammern habe ich gesetzt, es sieht aus meiner Sicht auch alles "richtig" aus. Vermutlich versuche ich falsch auf $self->{'_bin'}->{'xm'} zuzugreifen?

$parent habe ich hier ganz rausgenommen und durch $class ersetzt. In Parent war der Name der Mutterklasse.

Viele Grüße
Chrisi