Если в параметрах сервера в параметры перла загнать -w, то скрипт сетап выполняется, но на результирующей странице появляется всякий мусор типа:
~; my @dirs=($public_dir, $data, "$data/comments", $img_dir, $foto_dir, "$tmpl_dir/include"); foreach my $direct(@dirs){ if (-e $direct){print qq~
и он не создает ни одного файла в папке дата
а при выполнении скрипта админ, выдается несчетное количество символов, например:
------------ $script_admin||=$ENV{\'SCRIPT_NAME\'}; if ($ENV{\'REQUEST_METHOD\'}){%in=&parse_form;} #......CATEGORY if ($in{\'new_cat\'}) {&create_category;} elsif ($in{\'save_mod_category\'}) {&save_category;} elsif ($in{\'save_category\'}) {&save_category;} elsif ($in{\'delete_category\'}) {&delete_category;} elsif ($in{\'view_category\'})
и так далее, а потом переход на страницу:
http://professorf/cgi-bin/script/admin/$script_admin?rebuild_all=1&cat_num=$cat
ну раз в апаче работает, то буду ставить его, хотелось как проще, а выходит....