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