Z39.50 is a protocol used mostly in library software. References here on the wiki are:
[Yaz] - toolkit that provides access to the Z39.50/SR protocol [ASN] - abstract syntax notation [Zebra] - text indexing and retrieval engine
Now, is anybody aware of a z39.50 server written in Tcl? There is one in Perl, called SimpleServer.