Срочно нужна помощь

Ты бы лучше показал сам код.

Обрывается всё время на одном и том же месте или около 90% но не точно в одном месте?

И ещё: версии Perl'а на локальной машине и на сервере одинаковые? А набор библиотек? И показал бы ты, всё-таки, код если не жалко.

build_form("test.html", "a=1,b=2,c=3", "");

sub build_form
{
open(IN, "./form/".$_[0]);
while($buf = <IN>) { $form = $form.$buf; }
close IN;

if($_[2] == 1)
{
$insert_list = $_[1]."<?:.:?>";
@insert = split(/<\?:.:\?>/, $insert_list);
}
else
{
$insert_list = $_[1].",";
@insert = split(/,/, $insert_list);
}

foreach $vv(@insert)
{
$var_look = index($vv, "=", 0);
$var = substr($vv, 0, $var_look);
$value = substr($vv, $var_look + 1, length($vv) - $var_look - 1);

var_find:
$look_a = index($form, "<INSERT_$var/>", 0);
if($look_a == -1) { goto var; }
$sub_a = substr($form, 0, $look_a);
$sub_b = substr($form, $look_a + length($var)
+ 10, length($form) - $look_a - length($var) - 10);
$form = $sub_a.$value.$sub_b;

goto var_find;

var:
}

print $form;
}


Всё время обрыв на одном и том же месте, а некоторые файлы вообще не хочет выводить, да версии одинаковые, со стороны сервера используется только CGI.pm и DBI.pm, прробовал брать html шаблон не из файла, а из базы данных, разницы нет, соответственно проблема в выводе, пробовал написать простенький скрипт - чтение - вывод на печать, всё работало, а полный скрипт нет. Приведённая выше функция находится в загружаемом модуле, и вызываетя из главного скрипта, передаём ей ряд параметров, они вставляются в html-код и выводятся зрителю.

Если кто-то может посоветовать, могу прислать все скрипты на мыло. Проблема серьёзная, т. к. заказчик хочет видеть всё в действии...

Спасибо всем, кто откликнулся, проблему я решил, вся мудатня из-за того, что на сервере веб-хостинга интерпретатором не поддерживается печать из модуля, (модуль начинает выводить инфу, но что-то его обрывает), надо делать return а затем из главного скрипта print.

Ну вот, пока другим рассказывал уже и сам понял ;-)