|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Artem Chuprina 2:5020/400 09 Jan 2002 12:35:21 To : Maxim Vavilov Subject : Re: отправить POST'ом -------------------------------------------------------------------------------- Здравствуй, Maxim Vavilov. AC>>>> Обычно это означает, что из-под апача твоему скрипту запрещено AC>>>> ходить MV>>> А как это проверить/вылечить? AC>> Спросить админа. MV> Я - админ. Админ ему не запрещал. :) Ты не админ. Ты юзер, знающий пароль админа. Судя по вопросам. AC>>>> в сеть. В случае тестирования дома под Win9x недавно кто-то AC>>>> рассказывал про такую проблему, связанную с тем, что это Win9x. MV>>> Проверял как дома под Apache win32 1.3.6 из под win2000, так и на MV>>> f2s.com. AC>> Дома у тебя Apache под каким юзером работает? MV> Под админом. А не под SYSTEM? Точно? AC>>>> Шустрее точно не будет. И на половину сайтов тоже ходить не AC>>>> будет. Ибо name-based virtual hosts. LWP, в отличие от тебя, об AC>>>> этом знает... MV>>> Можно ли как-то определить virtual host: 1. С помощью топика? MV>>> 2.Каким -либо Програмным обеспечением? AC>> Hет. И не нужно, что характерно. Hужно просто правильно задать запрос. AC>> Что LWP делать умеет, а ты, судя по коду - нет. MV> А как привильно? Hа твоем уровне - исключительно по документации к LWP. MV> Можешь мне показать работающий у тебя код? ==== 8< [test.pl] ==== #!/usr/bin/perl -w # Create a user agent object use LWP::UserAgent; $ua = new LWP::UserAgent; $ua->agent("AgentName/0.1 " . $ua->agent); # Create a request my $req = new HTTP::Request POST => 'http://www.perl.com/cgi-bin/BugGlimpse'; $req->content_type('application/x-www-form-urlencoded'); $req->content('match=www&errors=0'); # Pass request to the user agent and get a response back my $res = $ua->request($req); # Check the outcome of the response if ($res->is_success) { print $res->content; } else { print $res->as_string; } ==== >8 [test.pl] ==== Отличается от приведенного в perldoc LWP только тем, что в случае ошибки выводится то, что принесли. Ибо там давно уже отдают 404. Применительно к твоей проблеме, с которой все началось - да, тот же самый код работает и из-под Apache. Точно так же (с точностью до выдачи HTTP заголовков). У _меня_. -- Artem Chuprina Communiware.net RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757 P.S. "Hайдите десять отличий". ran@party> telnet ivan.narod.ru 80 Trying 213.180.193.98... Connected to ivan.narod.ru. Escape character is '^]'. GET / HTTP/1.0 HTTP/1.1 404 Not Found Date: Wed, 09 Jan 2002 08:30:01 GMT Server: CERN httpd 3.0A (VAX VMS) Python/3.0b Unicode featured Connection: close Content-Type: text/html; charset=windows-1251 ... ran@party> telnet ivan.narod.ru 80 Trying 213.180.193.98... Connected to ivan.narod.ru. Escape character is '^]'. GET / HTTP/1.1 Host: ivan.narod.ru HTTP/1.1 200 OK Date: Wed, 09 Jan 2002 08:30:47 GMT Server: CERN httpd 3.0A (VAX VMS) Python/3.0b Unicode featured Set-Cookie: nuid=1158995971010565052; path=/; expires=Sat, 07-Jan-12 08:30:47 GMT; domain=.narod.ru Last-Modified: Wed, 04 Jul 2001 13:32:10 GMT ETag: "196c112-9ad-3b431ada-windows-1251" Content-Length: 2784 Connection: close Content-Type: text/html; charset=windows-1251 ... P.P.S. RTFM: RFC 2616. Отправлено через сервер Talk.Ru - http://www.talk.ru --- ifmail v.2.15dev5 * Origin: Talk.Ru (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/63591b0b4e80.html, оценка из 5, голосов 10
|