请教一个perl连接数据库的问题请高手给看看！！

frankwen

我来给你整理一下2楼的和你的
open (outFH,">;/tmp/log.txt"||die "can't open file!\n";
$sth->;execute;
while (my $ref=$sth->;fetchrow_arrayref)
{
   print outFH @$ref,"\n"; #这就是把查出来的结果写到文件里。
}

close(outFH);

$Dbh->;disconnect ;

这下明白了吧？