in reply to Timeout Failing

Remove the eval.
C:\>perl -e "eval { local $SIG{ALRM} = sub { die 'db_timeout' }; alarm + 3; sleep 4; }; print 1" 1 C:\>perl -e "local $SIG{ALRM} = sub { die "db_timeout" }; alarm 3; sle +ep 4;" db_timeout at -e line 1. C:\>
Edit: No coffee yet.


holli

You can lead your users to water, but alas, you cannot drown them.