ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Alexander Menzheres                  2:463/4444.604 12 May 2001  22:40:27
 To : All
 Subject : сохранение файла
 -------------------------------------------------------------------------------- 
 

    Есть скрипт:
 
 $File_to_open="picture.gif";
 open (F,$File_to_open);
 print "Content-type: application/octet-stream\nContent-Length: " . (-s F) .
 "\nContent-Disposition: attachment; filename=". $File_to_open . "\n";
 binmode F; binmode STDOUT;
 @q=<F>;
 close(F);
 foreach(@q){print;}
 
      при выполнении выводится окно Save As, файл сохраняется, но с неправильным 
 размером и содержанием. Как сделать правильно?
 --- -=PLUR-let it be not only the words=-
  * Origin: ~PsyShine~  (2:463/4444.604)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    сохранение файла   Alexander Menzheres   12 May 2001 22:40:27   сохранение файла   Konstantin Stepanenkov   20 May 2001 21:27:10