note momo33 This may contain all information but my Perl and Tcl knowledge is insufficient to turn the info into working code. Sorry 894122 894279