A-M baby
This commit is contained in:
parent
764da6cbbb
commit
db842d013d
19005 changed files with 197040 additions and 7 deletions
6
Task/Input-loop/Tcl/input-loop-2.tcl
Normal file
6
Task/Input-loop/Tcl/input-loop-2.tcl
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
set fh [open $filename]
|
||||
set data [read $fh]
|
||||
close $fh
|
||||
foreach line [split $data \n] {
|
||||
# process line
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue