|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Sergey Sosnin 2:5012/50.54 22 May 2002 20:25:55
To : Alexey Lyakhovsky
Subject : binary file
--------------------------------------------------------------------------------
Мои бортовые системы запеленговали, что в Понедельник Май 20 2002 04:29, Alexey
Lyakhovsky писал All:
AL> Вpоде все пpосто, а хpень какая-то полyчается...
AL> Пpисылается файл pазмеpа 0 :(
AL> Вот скpипт:
AL> #!/usr/bin/perl
AL> $|=1;
AL> $filename = "prog.exe";
AL> $filesize = (-s "$filename");
AL> print "Accept-Ranges: bytes\n";
AL> print "Content-Length: $filesize\n";
AL> print "Content-Disposition: filename=$filename\n";
AL> print "Content-type: application/bin\n\n";
AL> open(PIC,"$filename") || die "can't open the file";
AL> print;
AL> close(PIC) || die "can't close the file";
Поищи инфу про функцию binmode с каких это пор бинарники открываются как
текстовики.
C уважением, Sergey Sosnin.
--- УТВЕРЖДАЮ. MSG-редактор капитан 2.5 ранга Голд Дедович фор ДОС
* Origin: Ишь ты! Карманный вариант героя! (2:5012/50.54)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
