This package is part of tcllib. aku wrote it.
available from teapot (and elsewhere??) provides client name service facilities.