Dmitry Volkov Выложите Apache с DBI и DBD-MySQL драйвером
Apache не при чем, драйвер нужен для Perl
Устанавливаешь Apache, MySQL, Perl
в командной строке (при включенном интернете):
c:\\>ppm
ppm> install dbi
ppm> install dbd-mysql
скрипт:
#![%path to perl%] -w
use strict;
use DBI;
my $dbh ="DBI:mysql:[%database name%]:[%host name%]:[%port name%]";
$dbh = DBI->connect($dbh, [%database user%], [%database pass%]);
my $sql = "SELECT * FROM [%table name%]";
my $sth = $dbh -> prepare($sql); $sth -> execute();
my $data = $sth -> fetchall_arrayref();
my $rows = $sth -> rows;
$sth -> finish();
$dbh -> disconnect();
print "Content-type: text/html; charset=windows-1251\\n\\n";
for my $i (0..$rows-1) {
print qq "${$data}[$i][0] - ${$data}[$i][1] [%...%]
"; # соответственно сколько полей в таблице
}
print qq "RESULT OK!!!
";
exit;
соответсвенно вместо [% %] - ставишь свои значения;
если не знаешь некоторые параметры то подставляй такие:
[%database host%] - \'localhost\';
[%database port%] - \'3306\';
[%database user%] - \'root\';
[%database pass%] - \'\';
