Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re: Re: Re: Re: Speeding up the DBI

by tantarbobus (Hermit)
on Jul 14, 2003 at 20:04 UTC ( #274139=note: print w/ replies, xml ) Need Help??

in reply to Re: Re: Re: Speeding up the DBI
in thread Speeding up the DBI

$dbh->do(q{DECLARE imprecator CURSOR FOR SELECT * FROM tablename}) ; my $number = 10; my $fetch = $dbh->prepare(q{FETCH $number FROM imprecator}); ## ### Fetch first $number * 10 rows. ## while ($fetch->execute()) { Data::Dumper::Dumper($fetch->fetchall_arrayref()); last if $fetch->rows() < $number; }
Note: The code above has not been tested; it is for illustrative purposes only.

Comment on Re: Re: Re: Re: Speeding up the DBI
Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://274139]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (4)
As of 2015-12-02 02:49 GMT
Find Nodes?
    Voting Booth?

    My keyboard shows this many letters:

    Results (32 votes), past polls