in reply to Re: Re: SQL Stored Procedure return value
in thread SQL Stored Procedure return value
#!/usr/bin/perl -w use strict; use DBI; my $dbh = DBI->connect( $dsn, $user, $pass, { PrintError => 0, RaiseError => 1 } ); eval { my $sql = "blah ... "; my $sth = $dbh->prepare( $sql ); $sth->execute; do { ... } while( $sth->{syb_more_results}); $sth->finish; }; if( $@ ) { print STDERR "DB error: $@\n"; } $dbh->disconnect if $dbh;
-derby
|
|---|