насколько мне известно: через сокеты такую штуку реализовать нельзя.
(я не пишу на perl, но на php и на C++ не встречалось)
Тут нужно курить более низкий уровень, библиотеки типа libnet.

А ещё лучше KEZа спросить: как он реализовал подобное в своих ботах :]