mysql – 连接数据库Perl

我使用以下代码连接到mysql数据库:

my $dbh = DBI->connect("DBI:mysql:test:localhost", $user, $pass)
    or die $DBI::errstr;
my $sqlQuery  = $dbh->prepare($query) 
    or die "Can't prepare $query: $dbh->errstr\n"; 
my $rv = $sqlQuery->execute 
    or die "can't execute the query: $sqlQuery->errstr";

while (my @row= $sqlQuery->fetchrow_array()) {
    # do something;
}

我的疑问是:直到我的应用程序与小型数据库交互时才会好.但是,当我将此应用程序移动到数据库大小可能达到100 GB的实时环境时,此代码可能会导致性能问题.实际上我要问的是,在线 –

@row= $sqlQuery->fetchrow_array();

将Perl复制整个表内容并将其转储到变量中.如果是,是否会对我的应用程序以及数据库服务器造成重大性能问题?

最佳答案
在线:

@row= $sqlQuery->fetchrow_array();

数据库会将一行一次返回到perl,如果与大型数据库交互,则不会将查询的整个结果集转储到变量.

$arrRef = $sqlQuery->fetchall_arrayref();

另一方面..

转载注明原文:mysql – 连接数据库Perl - 代码日志