|
|
|
новичок
участник
Last Login: 15.05.2002 3:24
Сообщ.: 1,
Visits: 12
|
|
На локальной машине все ОК. А на сервере не работает Upload (загрузка файлов на сервер):
В первой строке "вырубается"! Файл не создается:
if (not open(FILE, ">$files_folder/$file")) {
## ERROR
print "Content-type: text/html";
print <<HTML;
ERROR!
HTML
exit();
} ## ERROR
else{ ## FILESOURCE OK
my $data;
binmode (FILE);
binmode ($p_filesource);
while (read($p_filesource,$data,1024)) {
print FILE $data;
}
close FILE;
} ## FILESOURCE OK
Пожалуйста, помогите! Что это может быть?
Сервер не может создать файл, что-то со строкой
if (not open(FILE, ">$files_folder/$file")) {
Пути правильные и имя файла тоже, например:
$files_folder='/home/XXX/public_html';
$file='my_file.gif'
HTML-форма тоже правильная.
|
|
|
|