# Macht möglich, die Attribute als Methode abzufragen
# Verändert NICHT die Attribute der Instanz, wenn Argumente
sub AUTOLOAD{
    my $self  = shift;
    my $attr = our $AUTOLOAD =~ /(\w+)$/ ? $1 : undef;
    $self->{$attr};
}