|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Artem Chuprina 2:5020/400 24 May 2002 20:33:21 To : Sergey Sosnin Subject : Re: binary file -------------------------------------------------------------------------------- Здравствуй, Sergey Sosnin. 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"; SS> Поищи инфу про функцию binmode с каких это пор бинарники открываются как SS> текстовики. Hа тех системах, где работает #!/usr/bin/perl, как правило, это различие отсутствует... -- Artem Chuprina Communiware.net RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757 --- ifmail v.2.15dev5 * Origin: Leninsky 45 home network (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/14454926f50ce.html, оценка из 5, голосов 10
|