Задача в загрузке 30 или меньше файлов на сервер по хттп,
почему то, файлы создаются на сервере, но не записываются,
где то в приведенном куске ошибка, но я не знаю что копать.
помогите ожалуйста.
for ($j=1; $j<31; $j++) # счетчик
{
if (@file[$j]) # проверка существования файла
{
$file="@file[$j]";
open(UPLOAD, ">/home/apache/hosts/рщые/virtual/temp/$year/$mon/$mday/$file") || Error();
my ($data, $length, $chunk);
print $file;
while ($chunk=read($file, $data, 1024))
{
print "adssdadsadsasd";
print $data;
print UPLOAD $data;
$length+=$chunk;
if ($length>$limit) {
print"превышен лимит загрузки";
exit;}
close(UPLOAD);
}