私はtclで式を取り、それをに変換したいと_
思い<
ます>
。いくつかの例:
bla_bla_4_
->bla_bla<4>
bla_bla_4
->bla_bla_4
bla_4_
->bla<4>
どうすればいいのですか?regsubのマニュアルで見つかりませんでした。
私はtclで式を取り、それをに変換したいと_
思い<
ます>
。いくつかの例:
bla_bla_4_
->bla_bla<4>
bla_bla_4
->bla_bla_4
bla_4_
->bla<4>
どうすればいいのですか?regsubのマニュアルで見つかりませんでした。
正しいパターンが必要です。
set parts {"bla_bla_4_" "bla_bla_4" "bla_4_"}
foreach part $parts {
regsub -all {_(\d+)_} $part {<\1>} result
puts "$part -> $result"
}
これは
bla_bla_4_ -> bla_bla<4>
bla_bla_4 -> bla_bla_4
bla_4_ -> bla<4>
動作するはずです:
regsub -all {_(\d+)_} $Line "<\\1>" Line