$sock->sockopt(SO_BROADCAST,1)

##</code><code>##

$sock->sockopt(SO_BROADCAST,0)