sub mach_was { my $dienst=shift; #... }