For more information see
$ perldoc perlport
Not much more information, mind you, but at least a positive
statement that alarm is not implemented on Win32. This
document also describes all the other stuff without which I
can't believe an operating system can survive
PROTECTED]
Sent by: [EMAIL PROTECTED]
09/24/2002 05:23 PM
Please respond to ORACLE-L
To: Multiple recipients of list ORACLE-L [EMAIL PROTECTED]
cc:
Subject:RE: How to reproduce a hanging connect attempt
Jared,
It is adequate.
Below is snip from Steve
In Perl:
my $dbh = '';
eval {
local $SIG{ALRM} = sub { die };
alarm 60;
my $dbh = DBI-connect(
'dbi:Oracle:' . $db,
'scott','tiger',
);
};
alarm 0;
unless ($dbh) {
print db $db is down;
}
Humm do you know
]
cc:
Subject:RE: How to reproduce a hanging connect attempt
In Perl:
my $dbh = '';
eval {
local $SIG{ALRM} = sub { die };
alarm 60;
my $dbh = DBI-connect(
'dbi:Oracle:' . $db,
'scott','tiger',
);
};
alarm
PM
Please respond to ORACLE-L
To: Multiple recipients of list ORACLE-L
[EMAIL PROTECTED]
cc:
Subject:RE: How to reproduce a hanging connect attempt
In Perl:
my $dbh = '';
eval {
local $SIG{ALRM} = sub { die };
alarm 60
Have you fooled with the CONNECT_TIMEOUT_LISTENER parameter of listener.ora?
Setting it to 0 won't guarantee a connection will hang, but will tell a process to
wait forever to connect. Hanging connections were a problem for us with the earlier
Oracle 6 releases. My solution was less
script didn't properly allow for hangs.
Jared
MacGregor, Ian A. [EMAIL PROTECTED]
Sent by: [EMAIL PROTECTED]
09/24/2002 11:59 AM
Please respond to ORACLE-L
To: Multiple recipients of list ORACLE-L [EMAIL PROTECTED]
cc:
Subject:RE: How to reproduce
Title: RE: How to reproduce a hanging connect attempt
Jared,
It is adequate.
Below is snip from Steve Adams's script (db_check.sh) and I successfully used similar technique for some time.
-- snip
rm -f $READY
print
connect nobody/really
host touch $READY
exit