Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re^2: socket time out

by xarex (Initiate)
on Nov 09, 2007 at 16:08 UTC ( [id://649928] : note . print w/replies, xml ) Need Help??

in reply to Re: socket time out
in thread socket time out

being new to perl i tried that exactly as you said
but its giving complitaion errors,
could you please try to be a little more specific?

Replies are listed 'Best First'.
Re^3: socket time out
by Anonymous Monk on Jan 04, 2008 at 11:24 UTC
    It's just missing a ; in the example at the end of the eval closing brace:
    eval {
        local $SIG{'ALRM'} = sub { die "Timed out" };
        while(<$conn>) {
    if ($@ =~ /Timed out/) {
        print STDOUT "Timed Out.\r\n";