@{$var1->{produkte}} = grep {$_ } @{$var1->{produkte}};