link PortIndex2MySQL.tcl