Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Re^2: Does IO::Select work? Anywhere?

by BrowserUk (Pope)
on Oct 24, 2012 at 12:24 UTC ( #1000622=note: print w/replies, xml ) Need Help??

in reply to Re: Does IO::Select work? Anywhere?
in thread Does IO::Select work? Anywhere?

Do you think those sorts of tests on a select socket would be able to detect your "eternal a" script, and dispose of it?

The solution is to not use readline, or anything that blocks waits for a terminator that may never arrive.

Instead, use recv or sysread and get whatever is available when can_read() tells you there is something there, and accumulate those somethings until a newline (or other terminator) is seen before taking action.

In the case of the client that never sends a terminator, it will eventually time out if it never transmits anything more.

The most effective DOS strategy against badly written multiplexing servers is to send one character every (say) 890 seconds (default timeouts are often 900), but to never send a terminator.

Another strategy is to send huge packets that overrun memory. For badly designed C code, that usually results in the classic buffer overrun. For a perl program, it can actually be worse. As Perl will just keep increasing the size of the scalar, it can put the server into swapping and bring everything to a crawl without actually blowing it out of the water.

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.

RIP Neil Armstrong


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1000622]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (4)
As of 2018-06-23 22:21 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (126 votes). Check out past polls.