sub meine_funktion { # \@ARRAY, \%HASH, $NOCHWAS, $UNDMEHR
  my $array_ref = shift;
  my $hash_ref = shift;
  my $string1 = shift;
  my $string2 = shift;

  print 'Hashwert Zweite ist dann ', $hash_ref->{Zweite};
  print 'Arraywert 3 ist dann ', $array_ref->[3-1];
}