koliama [OFF]У меня складывается впечатление, что автор сам не понимает что делает...[/OFF]
Кстати с вашим вторым советом
my $summa = ($sth->fetchrow_array)[0];
не работает.
выдает что-то типа
$summa = Array(0x........)
Вот это что-то типа выдавать должно не ссылку на массив, а элемент оного, ARRAY(xxxx) - есть ссылка на массив...
Ессно такая конструкция работать не будет. Если ее набирать в консоли или через MySql Front например ...
Но в cgi скрипте она отрабатывает. Я вчера весь вечер переводил perldoc DBI - еще раз повторюсь - явно нигде не сказано, что ; ставить нельзя.
Какая конструкция??? Поробуй выполнить свой запрос не в скрипте, а консоли и посмотри результат... При этом сначала выведи запрос на экран, причем в том месте скрипта где ты его пытаешься выполнить!
90% вероятность того что переменная $table у тебя не определена! Соответственно запрос не верен! Но конечно, логи ошибок, мы так и не удосужились посмотреть и увидеть свою ошибку!
еще раз рекомендуется использовать strict, а в идеале еще и warning (-w)