Perl socket timeout

[mdemmitt]

Hi,
I am new to perl socket programming. I have written a simple perl
server. I call:
$client = $server->accept()

I want the $client socket to timeout and automatically close after 15
seconds. Is this possible. I've googled for this, but can't find
anything specific to my question. Anyone have experience with this.

-Mike

 

[Sébastien Cottalorda]

(e-mail address removed) a écrit :

Hi,
I am new to perl socket programming. I have written a simple perl
server. I call:
$client = $server->accept()

I want the $client socket to timeout and automatically close after 15
seconds. Is this possible. I've googled for this, but can't find
anything specific to my question. Anyone have experience with this.

-Mike

Hi,

perldoc -f alarm

Hope this helps.

Sebastien

 

[xhoster]

Hi,
I am new to perl socket programming. I have written a simple perl
server. I call:
$client = $server->accept()

I want the $client socket to timeout and automatically close after 15
seconds.

From what you have shown, you are not doing anything with the $client
connection, so there is nothing to time out. Is it really the accept
call (on the $server socket) which you wish to timeout?

Is this possible. I've googled for this, but can't find
anything specific to my question. Anyone have experience with this.

There is more than one way to do it, and the best way depends on what
you want to do after timing out. You could use "alarm", or you could
use IO::Select. (If canread returns the $server socket, then you know you
can call accept on it without blocking.)

Xho

 

[mdemmitt]

From what you have shown, you are not doing anything with the $client
connection, so there is nothing to time out. Is it really the accept
call (on the $server socket) which you wish to timeout?

The code above is not all of the code. The line above is used to
accept an incoming connection. Afterwards, I read from and write to
$client. Eventually, when the client wants the server to close the
connection it sends a specific token, let's say the token is "END". I
want to account for the possibility of the client machine crashing or
failing to send END. To account for these possibilities, I want $client
to automatically close 15 seconds after it has been opened. Is this
possible? I will look into alarm and see if there is a way I can use
that to replicate the functionality I am looking for. It would be
nice, however, to be able to set some timeout value for a client
socket.

Thanks,
Mike