Re^3: IO::Socket reconnect

Could you expand a little on what "it" was that you tried, and what you mean by "doesn't work" - What specific messages did you get ?

Did it still try to send if the socket was not connected ?

WHat was your recovery logic ?

"Think of how stupid the average person is, and realize half of them are stupider than that." - George Carlin

Comment on Re^3: IO::Socket reconnect

Replies are listed 'Best First'.
Re^4: IO::Socket reconnect by nikita.af (Acolyte) on Feb 17, 2016 at 23:00 UTC
Of course. I tried to use same code as in your example. such code don't work for me. As I understand if I open socket to accept connections (not to create to a remote host) then it doesn't have state "connected" at all. Not sure if my suggestion is right, I'm beginner in Perl (and in programming). I checked my suggestion with this example: http://www.perlmonks.org/?node_id=884065 Script's logic is to accept a connection and start to send a data, if connection was closed, then stop to publish a data and wait for a new connection	[reply]
Re^5: IO::Socket reconnect by NetWallah (Canon) on Feb 18, 2016 at 04:27 UTC
I researched this some more, and now wish to withdraw what I proposed earlier. The correct way to handle this is to do what golux (++) said. Here is the sequence of events on failure: * You attempt to SEND to the client * Client has closed the socket * The error is indicated to your program via a $SIG{PIPE} * You need to trap that signal as golux suggested, and set the value of the global $b_err * You check the value of $b_err before the next activity on the socket. * IF triggered, close the client socket, and wait for the client to reconnect (Go back to "accept"). "Think of how stupid the average person is, and realize half of them are stupider than that." - George Carlin	[reply]
Re^6: IO::Socket reconnect by nikita.af (Acolyte) on Feb 18, 2016 at 12:52 UTC
Yep, this is what I already have done =)	[reply]