Hi --
I'm running into a strange problem with a script that uses DBI and
DBD::Oracle. Once my script connects to my database, I can't use ctrl-c to
exit (or ctrl-z to background it). I end up having to open another shell
and kill the original process manually. As you can imagine, this wreaks all
kinds of havoc with Catalyst code, stuff that runs under mod_perl, etc.
Otherwise the database handle seems to work fine. I'm able to execute
queries without any problem. I just can't exit when I'm done.
For example here's some sample code:
---------------------------
#!/usr/bin/perl
use DBI;
my $db = DBI->connect(
'DBI:Oracle:host=myserver;port=1234;sid=mysid','myusername','mypassword');
#my $db = DBI->connect( 'dbi:SQLite:othertestdb.db','','');
while (1) {
print STDERR '.';
sleep 10;
}
end;
---------------------------
If I comment out the Oracle connect line and use the SQLite connect line
instead, I'm able to interrupt the script with ctrl-c as I'd expect.
My environment:
Solaris 9
Perl 5.8.8
DBI 1.609
DBD::Oracle 1.22, Oracle 10.2.0.4 client
Seems like something is trapping $SIG{INT}, but I can't find it. Anyone
have any ideas?
Thanks!
Colin
