4 lines
68 B
Tcl
4 lines
68 B
Tcl
|
|
forfilelines myline mydata.txt {
|
||
|
|
puts [string length $myline]
|
||
|
|
}
|