my @auswahlpunkte = split /,/, $zeile;
for my $auswahlpunkt (@auswahlpunkte) {
    print qq{<option value='category="$auswahlpunkt"'>$auswahlpunkt</option>};
}