如何在 TCL 中剪切字符串？
How do I cut a string in TCL?
您好，我正在尝试在我的脚本中剪切一个字符串并将它们设置为我脚本中的两个不同变量。
date_string = "OCT-09-1956"
我想做的是将上面的 date_string 变量分成两个不同的变量，一个月变量和一个年变量。
有些人可能会告诉您 regexp 是这里的解决方案。
我建议使用 split 命令创建一个新列表，然后从列表元素中分配新变量。除非真的有必要，否则我喜欢避免使用正则表达式。
set date_string "OCT-09-1956"
lassign [split $date_string "-"] month day year
puts "The month is $month"
puts "The year is $year"
您好，我正在尝试在我的脚本中剪切一个字符串并将它们设置为我脚本中的两个不同变量。
date_string = "OCT-09-1956"
我想做的是将上面的 date_string 变量分成两个不同的变量，一个月变量和一个年变量。
有些人可能会告诉您 regexp 是这里的解决方案。
我建议使用 split 命令创建一个新列表，然后从列表元素中分配新变量。除非真的有必要，否则我喜欢避免使用正则表达式。
set date_string "OCT-09-1956"
lassign [split $date_string "-"] month day year
puts "The month is $month"
puts "The year is $year"