Сообщения

1

Perl / DBI::ODBC, не работает из CGI ?

« : 25 Июня 2005, 19:00:25 »

Короче разобрался я.
Всем спасибо.

Надо было на этот скрипт в IIS указать права участника MSSQL с админскими правами.

2

Perl / DBI::ODBC, не работает из CGI ?

« : 25 Июня 2005, 18:27:20 »

Объявление глобальных переменных через our( $var2, $var3 ); помогло, теперь в shell ошибки не валят.

Но IIS также упорно продолжает считать до 2х


Тоесть общая ситуация не изменилась, может еще есть варианты?

3

Perl / DBI::ODBC, не работает из CGI ?

« : 25 Июня 2005, 14:20:20 »

Тогда я получаю следующий список ошибок.

Global symbol "$dbh" requires explicit package name at E:\\WMSystem\\WM1\\test3.pl line 13.
Global symbol "$sth" requires explicit package name at E:\\WMSystem\\WM1\\test3.pl line 17.
Global symbol "$dbh" requires explicit package name at E:\\WMSystem\\WM1\\test3.pl line 17.
Global symbol "$sth" requires explicit package name at E:\\WMSystem\\WM1\\test3.pl line 24.
Global symbol "@row" requires explicit package name at E:\\WMSystem\\WM1\\test3.pl line 28.
Global symbol "$sth" requires explicit package name at E:\\WMSystem\\WM1\\test3.pl line 28.
Global symbol "$element" requires explicit package name at E:\\WMSystem\\WM1\\test3.pl line 30.
Global symbol "@row" requires explicit package name at E:\\WMSystem\\WM1\\test3.pl line 30.
Global symbol "$element" requires explicit package name at E:\\WMSystem\\WM1\\test3.pl line 32.
Execution of E:\\WMSystem\\WM1\\test3.pl aborted due to compilation errors.

4

Perl / DBI::ODBC, не работает из CGI ?

« : 24 Июня 2005, 22:42:00 »

Есть маленький скрип на perl

Пытаюсь обратиться к MSSQL.
Из shell все работает, из под IIS нет.

Причем все это как то очень хитро. Следующий скрипт выводит в STDOUT счетчик от 1 до 4.

при исполнении скрипта из под IIS мы получаем только 1,2.


#!/usr/bin/perl
use CGI qw/:all/;  
use DBI;

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

print "1\\n";
$dbh = DBI->connect(\'dbi:ODBC:TM2\',\'sa\', \'123\');

print "2\\n";

$sth = $dbh->prepare("
SELECT     *
FROM         table1");

print "3\\n";

$sth->execute();

print "4\\n";

@row = $sth->fetchrow_array();
foreach $element (@row)
{
print "<p>AA $element</p>\\n";
}

print "5\\n";


В shell это все работает, даже данные выдает.

Затыкается все на
 $sth = $dbh->prepare(" 
SELECT     * 
FROM         table1"); 


Причем очень интересно. Если я вместо prepare напишу
 $sth = $dbh->xxxxxxx;
То CGI скрипт как работал, так и работает. Тоесть из под IIS он все также послушно считает до 2.

Из под shell разумеется сразу выдает ошибку.


В системе создан USER DSN с именем TM2 и ауентификацией windows.

Помогите, голову уже сломал.