如何使用IO :: Select阻止等待读或写套接字？

Question

I'm using IO::Select .

It is an OOP wrapper for the normal select call , but it exposes can_read() and can_write() methods. Is there no way to block waiting for a read or write socket? Does this not (almost) defeat the purpose of having IO::Select in the first place?

Answer 1

Use IO::Select->select :

select ( READ, WRITE, EXCEPTION [, TIMEOUT ] )

select is a static method, that is you call it with the package name like new . READ , WRITE and EXCEPTION are either undef or IO::Select objects. TIMEOUT is optional and has the same effect as for the core select call.

The result will be an array of 3 elements, each a reference to an array which will hold the handles that are ready for reading, writing and have exceptions respectively. Upon error an empty list is returned.

For example:

my $rsel  = IO::Select->new($rfh);
my $wsel  = IO::Select->new($wfh);
my $esel  = IO::Select->new($rfh, $wfh);

my @ready = IO::Select->select($rsel, $wsel, $esel, undef);

Answer 2

If TIMEOUT is not given and any handles are registered then the call will block.

It looks like can_read and can_write will block if you don't pass a timeout. I'd suggest that this is rarely what is desired, though it might be under some circumstances.

Personally, I'd suggest using one of the many event modules (POE, AnyEvent, etc) instead. It's a bit more to get going, but handles more scenarios more cleanly.