if ($data->{startpunkt}->{rule}->{rule}->{$i}->{src}->{members}->{reference}) { print "Quelle: ", $data->{startpunkt}->{rule}->{rule}->{$i}->{src}->{members}->{reference}->{Name}, "\n"; } elsif ($data->{startpunkt}->{rule}->{rule}->{$i}->{src}->{compound}->{compound}) { print "Quelle: ", $data->{startpunkt}->{rule}->{rule}->{$i}->{src}->{compound}->{compound}->{Name}, "\n"; } ...