Нужно создать несколько потоков, каждый из которых будет слушать мультикаст и перенаправлять полученное по другому адресу. Сделал на threads и использовал IO::Socket::Multicast, в котором должен быть метод таймаут как наследие, но он не работает. Приходится лепить что отдельно от IO::Socket::Multicast чтобы поймать таймаут при долгом recv. В perldoc threads нашел такое:

$SIG{ALRM} переопределяется в главном потоке, но для одного конкретного thread, а если потоков несколько, как для каждого переопределить сигнал?

Или приму в дар более простое решение на чем-то типа Coro или AnyEvent, пока не смог осилить создание нескольких потоков и контролирование их по таймауту в этих пакетах.

Как обычно советую использовать неблокирующий ввод/вывод.
Вот какой-то пример с IO::Socket::Multicast и IO::Select: http://stackoverflow.com/questions/2732195...onger-connected
Ну и исходник свой выкладывайте если не получится.

Pfailed, большое спасибо, смотрел на неблокируемый ввод/вывод, но пытаясь быстро найти решение не остановился на этом способе и уперся в таймауты. Как однопоточное решение работает, сейчас буду прикручивать к многопоточности.