|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Artem Chuprina 2:5020/400 04 Jan 2003 15:23:43 To : Alexander Ponomarenko Subject : Re: Upload -------------------------------------------------------------------------------- Здравствуй, Alexander Ponomarenko. AP> Hарод! Делаю так аплоад. И есть проблема: как из всего этого выделить AP> сам файл и имя файла. Если делать так, то в юниховской кодировке файлы AP> приходят нормально, а в виндовой неправильно. Как сделать правильно? Hе делать upload так. Делать его с использованием CGI.pm. Согласно FAQ. AP> #!/usr/bin/perl -w AP> read(STDIN,$file,$ENV{CONTENT_LENGTH}); AP> if ($^O =~ m/Win/) { $br = "\x0A" } else { $br = "\x0D\x0A" }; AP> $file =~ m/(\S+).*Content-Type: \S+$br$br(.*)\1/s; AP> @mas=split "\n",$file; AP> print"Content-type: text/html\n\n"; AP> print $file; AP> open(QWE,">uploads/qq"); AP> for($i=4;$i<=$#mas-2;$i++) { AP> print QWE "$mas[$i]\n"; AP> } AP> close(QWE); AP> Alexander -- Artem Chuprina Communiware.net RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757 --- ifmail v.2.15dev5 * Origin: Leninsky 45 home network (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/14454c9be89fc.html, оценка из 5, голосов 10
|