my $daten1 = $_; my @daten2 = @_;