如何从Perl的DBI中获取MySQL查询的结果？

概述我正在做以下事情,得到“1”我认为这意味着声明很好.但我想取而代之的是结果. 怎么了？ #!/usr/bin/perluse strict;use DBI;my $host = "test";my $database = "dd";my $port = 3306;my $user = "uuu";my $pw = "ppp";my $mysql = DBI->connect( 我正在做以下事情,得到“1”我认为这意味着声明很好.但我想取而代之的是结果.

怎么了？

#!/usr/bin/perluse strict;use DBI;my $host = "test";my $database = "dd";my $port = 3306;my $user = "uuu";my $pw = "ppp";my $MysqL = DBI->connect("DBI:MysqL:database=$database;host=$host;port=$port",$user,$pw)    or dIE "Cannot connect to MysqL server\n";my $m = $MysqL->do(qq{select MAX(IDvisit) from log_visit});print $m;

解决方法

my $m = $MysqL->selectrow_array(qq{select MAX(IDvisit) from log_visit});

总结

以上是内存溢出为你收集整理的如何从Perl的DBI中获取MySQL查询的结果？全部内容，希望文章能够帮你解决如何从Perl的DBI中获取MySQL查询的结果？所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。