Hi All,

Aplogies for the ambiguous question below. I'll explain it further.

I am writing the perl program which will analyze the Data Base
performance across different vendors. The amount of data is in orders of
Giga Bytes.

I want to select the data from table and want to see the number of
rows,data volume and time in fetching the data.

Here is the code snippet for this:

my $sth = $dbh->prepare($query)
            or die "Couldn't prepare statement: " . $dbh->errstr;
 $sth->execute();
$ref = $sth->fetchall_arrayref;
print "\nNumber of rows:", 0 + @{$ref};

It is taking too much time to retrieve the data which is in order of >25
million records. Is there any other api's or approach to measure this
and how I can measure the amount of data (in bytes) in perl.

Any suggestion will be great help for me.

Thanks
Gopal

-----Original Message-----
From: Agarwal, Gopal K [ICG-IT] 
Sent: Thursday, January 14, 2010 10:24 AM
To: '[email protected]'
Subject: Help needed.

Hi,

I am connecting the Oracle DB with perl DBI. For short queries
(execution time <2 sec) I am able to fetch the data  but for long
queries (>7 sec) my perl scripts hangs.

Can you please suggest.

Thanks
Gopal

Reply via email to