mysql - Perl DBI一次执行多个SQL查询

我需要一次执行2个mysql查询来查找查询中元素的位置号，比如：

SET @v1 := 0;  select tbl.number,tbl.name  from (select @v1:=(@v1+1) AS number, id, name,aps from acc order by aps desc limit 5) as tbl where tbl.name='jetli';

但是DBI不允许一次放置两个查询。
我怎样才能达到我的目标？

最佳答案

在MySQL中，user-defined variables are session-specific.可以在一个语句中设置一个变量，并在以后的语句中访问它：

$dbh->do('SET @foo := 0');

my ($result) = $dbh->selectrow_array('SELECT @foo');
print $result;
# 0