See my reply to your other post regarding TCL. However, if your goal is to use a TCL script with kron, you need to be aware that kron and TCL did not work together prior to 12.4(3). Additionally, it is better to use the Embedded Event Manager if you want to schedule TCL code to run periodically. See http://www.cisco.com/en/US/products/ps6441/products_configuration_guide_chapter09186a0080559cd5.html for more on TCL scripting in EEM (note: this is NOT applicable to tclsh).
Here is a simple example for listing directory contents. You can use this to cycle over all files, and copy them as you see fit:
set fileList [glob -directory flash: -nocomplain *]
foreach file $fileList {
puts "Filename is $file"
}
.jpg "Hall of Fame Cisco Employee"){kind=icon}
