Created by [CecilWesterhof]. A proc to display (what I think is) the most interesting tcl system information: ====== proc ::dcblUtilities::displaySystemInfo {} { set indent " " puts "TCL Version: ${::tcl_version}" puts "Patch Level: ${::tcl_patchLevel}" puts "Startup File: ${::tcl_rcFileName}" puts "FP Precision: ${::tcl_precision}" puts "argv0: ${::argv0}" puts "argc: ${::argc}" puts "argv: ${::argv}" foreach arg ${::argv} { puts ${indent}${arg} } puts "Libaries:" foreach lib ${::tcl_library} { puts ${indent}${lib} } puts "Package Path:" foreach path ${::tcl_pkgPath} { puts ${indent}${path} } parray ::tcl_platform } ====== ---- As always: comments, tips and questions are appreciated. [APN] One comment - the variable tcl_pkgPath is not guaranteed to exist on all platforms. Also, some additional system information is available as ====== foreach item [tcl::pkgconfig list] { puts "$item: [tcl::pkgconfig get $item]" } package require platform puts "Platform: [platform::identify]" ====== <>Utilities