Wie man unerwünschte charecters entfernen Split in tcl mit

Was haben Sie dort sehen aus wie eine Liste TCL eher als einen String. So behandelt die Daten als Liste, die Sie so etwas wie dies können:

set data [list a b {} {} e f {} {} g {}]
puts $data

set res {}
foreach ele $data {
    if { $ele != {}} {lappend res $ele}
}

puts $res

Hier ist, was Sie tun können:

set y "Interface {} {} {} {} {} {} {} {} {} {} {} {} {} {} {} {} {} IP-Address {} {} {} {} {} OK? Method Status {} {} {} {} {} {} {} {} {} {} {} {} {} {} {} {Protocol FastEthernet0/0} {} {} {} {} {} {} {} {} {} {} {} unassigned {} {} {} {} {} YES unset {} administratively down down {} {} {} {FastEthernet0/1} {} {} {} {} {} {} {} {} {} {} {} unassigned {} {} {} {} {} YES unset {} administratively down down"

set y [regsub -all ({}\ )+ $y ""]

Und hier ist das Ergebnis:

Interface IP-Address OK? Method Status {Protocol FastEthernet0/0} unassigned YES unset administratively down down {FastEthernet0/1} unassigned YES unset administratively down down

Arpan

Ich stimme mit Jackson, dass Ihre Daten sehr viel erscheint eine Liste (strukturierte Daten) zu sein. Können Sie die Struktur der Daten identifizieren, was ist? Wenn Sie können, dann können Sie die Daten in der Liste nehmen und die Werte richtig interpretieren ... und die {} Stücke sind sehr wahrscheinlich Felder, die keinen Wert haben. Für (ein vereinfachtes) Beispiel:

set data {
    Person Steve Smith employee
    Position employee Employee 40
}

while {[llength $data] > 0} {
    set type [lindex $data 0]
    set data [lrange $data 1 end]
    switch -exact -- $type {
        Person {
            set first_name [lindex $data 0]
            set last_name [lindex $data 1]
            set position_shortname [lindex $data 2]
            set data [lrange $data 3 end]
        }
        Position {
            set shortname [lindex $data 0]
            set hourperweek [lindex $data 1]
            set data [lrange $data 2 end]
        }
        default {
            error "Unknown data type $type"
        }
    }
}

Offensichtlich sind die Daten und Code ist ein bisschen zerknirscht (Ich habe sehr einfachen Code zu halten, klar, was ich tat), aber die Idee sollte verständlich sein.

Alles, was gesagt wird, es „fühlt“ für mich wie Ihre Daten „falsch“ in irgendeiner Weise ... wie es eine fehlende geschweifte Klammer in dort ein paar Orte (wie FastEthernet0 / 0 und 0/1 sowohl Kinder des Protokolls sein sollten , etc.)