- abstract in check for existance of a command whether this is scripted or not
- use a more modern tcl command set