$query_fuellen0->execute( (split /,/, $zeile)[0..4] ) or warn $dbh->errstr