in reply to Perl/SQL Query

I think if you: 
eval { $sth=$dbh->prepare("SELECT blurge
                           FROM blurge
                           WHERE blurge=\'$blurge\'") };
my $oops="oops. Look at this:\n$@";
return \$oops if $@;
eval { $sth->execute };
$oops="ooops. Look at this:\$@";
return $oops if $@;

[download]
And so on.....

update (broquaint): added formatting

Replies are listed 'Best First'.
Re: Re: Perl/SQL Query
by qmole (Beadle) on Sep 20, 2003 at 10:16 UTC
    Yeah, that's another way to do it. I think that only works if you set $handle->{RaiseError} = 1, though. That was the impression I got from the documentation.
[reply]
[d/l]
      That's right. When you do the connect.
[reply]

In Section Seekers of Perl Wisdom