目前,我正在洗掉第一個位置子字串,但我想在檔案中提到的所有字串的最后一個位置加入相同的第一個位置子字串(注意:這里每個子字串都按下劃線分類)
file.txt
A_Class
B_Class
A_Name_Student
B_Name_Student
Marks_Mid_Term_Student
Marks_Student_Subject
到目前為止,我試圖洗掉第一個子字串,但最終無法加入,
set school [string range $school [expr {[string first "_" $school] 1}] end]
基本上,我想將其列印為
Class_A
Class_B
Name_Student_A
Name_Student_B
Mid_Term_Student_Marks
Student_Subject_Marks
uj5u.com熱心網友回復:
有很多方法可以做到這一點。這是一種方法,將輸入字串轉換為由“_”分隔的元素串列,重新排列串列,然后轉換回字串形式:
set schl [split $school _]
set schl [lassign $schl first]
lappend schl $first
set school [join $schl _]
轉載請註明出處,本文鏈接:https://www.uj5u.com/qiye/434523.html
下一篇:在逗號后提取子字串
