Welcome, guest | Sign In | My Account | Store | Cart

Proc to write data in tabular format.

Tcl, 5 lines
1
2
3
4
5
# Print columns
proc puts_tabular {width args} {
    set fmt [string repeat "%-${width}s" [llength $args]]
    puts [eval [list format $fmt] $args]
}
Created by Patrick Finnegan on Sun, 23 Jan 2005 (MIT)
Tcl recipes (162)
Patrick Finnegan's recipes (56)

Required Modules

  • (none specified)

Other Information and Tasks