#!/bin/sh 
#\
exec wish "$0" "$@"
package require tar

##</code><code>##

   cd [file dirname $source]
   tar::create /tmp/directoryCopy.[pid].tar [file tail $source]
   cd $pwd
   cd $dest
   tar::untar /tmp/directoryCopy.[pid].tar
   file delete -force /tmp/directoryCopy.[pid].tar 
   cd $pwd

##</code><code>##

Error in startup script: can't find package tar
    while executing
"package require tar"
    (file "package.tcl" line 6)