my $person = Person->new( -name => 'Otto', -ort => 'Hamburg'  ) || die $@;