Tcl error [xblinfo]: wrong # args: no script following "[catch {set xblsrcsock [socket -async $xblsite 80]} sockerr]" argument
eh?