crazyinsomniac has asked for the wisdom of the Perl Monks concerning the following question:
p.s. i did do a mighty google but to no avail ;(use strict; use DBI; ##$SIG{__WARN__} = sub { die "warning why\n\n".shift(@_) }; { my $db_user = 'null'; #read only my $db_pass = 'nullnull'; my $db_name = 'null'; # the name of the db my $db_host = 'localhost'; my $db_driver = 'mysql'; my $db_serverstr = "DBI:$db_driver:$db_name"; my $db_h = DBI->connect( "$db_serverstr", "$db_user", "$db_pass", { HandleError => sub { die "WHYYYY\n".shift(@_) }}, ); } __END__ DBI is 1.201 This is perl, v5.6.1 built for MSWin32-x86-multi-thread
| ______crazyinsomniac_____________________________ Of all the things I've lost, I miss my mind the most. perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;" |
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
(jeffa) Re: DBI HandleError callback not being called
by jeffa (Bishop) on Jun 02, 2002 at 15:11 UTC | |
|
Re: DBI HandleError callback not being called
by Aristotle (Chancellor) on Jun 02, 2002 at 15:12 UTC |