我正在编写一个cgi程序，在浏览器中打印数据库查询结果。剧本是这样的

# !/usr/bin/perl

use strict;
use warnings;

use DBI;

print "Content-type: text/html\n\n";

my $driver   = "mysql";
my $database = "DBname";
my $ip       = "127.0.0.1";
my $db       = "DBI:$driver:DBNAME:$ip:database=$database";
my $username = "user";
my $password = "pass";

print "Connecting ...";

my $connection = DBI->connect($db, $username, $password)
    or print "Couldn't connect to database: " . DBI->errstr . "\n\n";

print "Successful connection\n";

my $query = $connection->prepare("SELECT id FROM table");

$query->execute() or die $DBI::errstr;

while ( my @row = $query->fetchrow_array() ) {
    my ($id) = @row;
    print "ID = $id \n";
}

$query->finish();

好吧，我的问题是当我用

perl test.cgi

它工作正常，我得到了正确的打印结果。cgi脚本位于 /Library/Webserver/CGI-Executables/ 默认配置为/cgi-bin/in /etc/apache2/httpd.conf 如果我通过网络浏览器执行它，我只会得到第一个打印 Connecting 别的什么都没有，连 or print 从 DBI->connect . 我一直在试图认识到错误是什么，但我无法得到一个有用的解决办法。