Register a script to be run at server shutdown
ns_atshutdown {script | procname ?args?}
ns_atshutdown registers a Tcl script or procedure to be run when the virtual server shuts down.
proc theLastThing {} { global Shared close $Shared(file) ns_mutex destroy $Shared(lock) } ... ns_atshutdown theLastThing ...