$sock->autoflush(1); $| = 1;