sub mach_was
{
  my $dienst=Dienst->new();
  #...
}