You can use select (perldoc -f select) or IO::Select to check for availability of data on multiple sockets. select() allows for the specification of a timeout. This function will allow you to wait for data to become available on any socket of interest so you don't have to go socket to socket looking for work to do.
--- print map { my ($m)=1<<hex($_)&11?' ':''; $m.=substr('AHJPacehklnorstu',hex($_),1) } split //,'2fde0abe76c36c914586c';
In reply to Re: Timing Socket Output
by pfaut
in thread Timing Socket Output
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |