Another thing that works is using a connect string to a non existent host. Takes
forever to return an error. A timeout of 5 seconds in the perl script works.

Thanks for your help, Dave
On Tue, Jan 14, 2003 at 12:16:27PM -0800, [EMAIL PROTECTED] wrote:
> Try killing the processes for an Oracle test database.
> 
> The goal is to fool the listener into thinking the database is
> still up, and creating a server, which should then hang.
> 
> It's worked for me in the past, but not always 100%.  May
> take a few tries.
> 
> Jared
> 
> 
> 
> 
> 
> 
> David Turner <[EMAIL PROTECTED]>
> Sent by: [EMAIL PROTECTED]
>  01/14/2003 10:46 AM
>  Please respond to ORACLE-L
> 
>  
>         To:     Multiple recipients of list ORACLE-L <[EMAIL PROTECTED]>
>         cc: 
>         Subject:        Re: perl timeout
> 
> 
> Thx I left your book in Missouri:( Now I'm trying to simulate a database 
> with
> hanging connections to test the script. Anyone know how best to simulate 
> that? 
> 
> Dave
> On Mon, Jan 13, 2003 at 07:43:29PM -0800, Jared Still wrote:
> > 
> > Gee Dave, I know of a book that has scripts that
> > already do this.  ;)
> > 
> > Here's an untested bit of code to demonstrate.
> > 
> >    my $dbh;
> > 
> >    eval {
> > 
> >       local $SIG{ALRM} = sub {
> >          die "connection timeout\n";
> >       };
> > 
> >       alarm 60;
> > 
> >    $dbh = DBI->connect(
> >      'dbi:Oracle:' . $db,
> >      $username, $password,
> >      {
> >          RaiseError => 1,
> >          AutoCommit => 0,
> >       }
> > 
> >    );
> > 
> >    };
> > 
> >    # the alarm reset must be outside the eval{}
> >    alarm 0;
> > 
> > I say untested cuz I simplified it a bit after lifting
> > it from a script.
> > 
> > HTH,
> > 
> > Jared
> > 
> > On Monday 13 January 2003 15:49, David Turner wrote:
> > > Does anyone have some perl code that will return an error if it take 
> longer
> > > than a certain number of seconds to connect to or return the results 
> from a
> > > database? I'd like to have some of my queries connect to an alternate
> > > database if there is a problem connecting or returning results within 
> 10
> > > seconds. Any other suggestions are appreciated.
> > >
> > > Dave
> -- 
> Please see the official ORACLE-L FAQ: http://www.orafaq.net
> -- 
> Author: David Turner
>   INET: [EMAIL PROTECTED]
> 
> Fat City Network Services    -- 858-538-5051 http://www.fatcity.com
> San Diego, California        -- Mailing list and web hosting services
> ---------------------------------------------------------------------
> To REMOVE yourself from this mailing list, send an E-Mail message
> to: [EMAIL PROTECTED] (note EXACT spelling of 'ListGuru') and in
> the message BODY, include a line containing: UNSUB ORACLE-L
> (or the name of mailing list you want to be removed from).  You may
> also send the HELP command for other information (like subscribing).
> 
> 
> 
-- 
Please see the official ORACLE-L FAQ: http://www.orafaq.net
-- 
Author: David Turner
  INET: [EMAIL PROTECTED]

Fat City Network Services    -- 858-538-5051 http://www.fatcity.com
San Diego, California        -- Mailing list and web hosting services
---------------------------------------------------------------------
To REMOVE yourself from this mailing list, send an E-Mail message
to: [EMAIL PROTECTED] (note EXACT spelling of 'ListGuru') and in
the message BODY, include a line containing: UNSUB ORACLE-L
(or the name of mailing list you want to be removed from).  You may
also send the HELP command for other information (like subscribing).

Reply via email to