Perl MySQL SET SQL_BIG_SELECTS = 1

Question

我有一个使用事务访问MySQL数据库的Perl脚本。 我需要在查询中设置SET SQL_BIG_SELECTS = 1，但不确定如何设置该选项。

如果我直接查询MySQL，我可以使用分号。 ie＆＃34; SET SQL_BIG_SELECTS = 1;选择＆＃34;，但这不适用于Perl。

以下是我的代码的基础知识......不确定如何/在何处放置SET SQL_BIG_SELECTS = 1

$dbh->do("BEGIN");          
my $sth4 = $dbh->prepare('SELECT blah blah blah');
$sth4->bind_param(1, $tmtri);
$sth4->bind_param(2, $tmyear);
$sth4->execute();
$dbh->commit();
-- do stuff
$sth4->finish();

Answer 1

执行：

$dbh->do('SET SQL_BIG_SELECTS=1');

连接数据库后。