3 lines
99 B
Tcl
3 lines
99 B
Tcl
|
|
set data [exec ls -l]
|
||
|
|
puts "read [string length $data] bytes and [llength [split $data \n]] lines"
|