Forum Webscript.Ru

Программирование => Perl => Тема начата: Starick от 06 Июня 2007, 09:04:00

Название: У меня вопросик есть ....
Отправлено: Starick от 06 Июня 2007, 09:04:00
Есть вот такая фигня. Что она делает объяснять не буду.

#!/usr/bin/perl -w

use Socket;

$host="www.perl.com";
$port="80";
socket(SOCK, PF_INET, SOCK_STREAM, getprotobyname(\'tcp\'));
$iaddr = inet_aton($host);
$paddr = sockaddr_in($port, $iaddr);
connect(SOCK, $paddr);

send (SOCK, "GET / HTTP/1.0\\n\\n", 0);
@data=;
close(SOCK);

print @data;

Так вот значит.
А как сделать запрос на wap ?
Например owap.ru.
Сколько не пытался , нифига не получается.:confused:

Помогите ? А ?
Название: У меня вопросик есть ....
Отправлено: arto от 06 Июня 2007, 10:22:48
perl -MSocket -le \'socket(SOCK, PF_INET, SOCK_STREAM, getprotobyname(\'tcp\')); connect(SOCK, sockaddr_in($ARGV[1],(inet_aton($ARGV[0])))); send (SOCK, "GET / HTTP/1.1\\nHost: $ARGV[0]\\n\\n", 0); print ;\' owap.ru 80
Название: У меня вопросик есть ....
Отправлено: Starick от 06 Июня 2007, 11:33:40
arto

СПАСИБО ! :)
Название: У меня вопросик есть ....
Отправлено: Starick от 14 Июня 2007, 08:44:55
Вот еще один вопросик .

Я ему вот такую фигню :

 use DBI;
 $db = DBI->connect(\'DBI:mysql:test:localhost\',\'root\',\'\') || die $DBI::errstr;

А он , гад , ругается :

DBI connect(\'test:localhost\',\'root\',...) failed: Client does not support authentication protocol requested by server; consider upgrading MySQL client at C:\\Perl\\pr_perl\\1.pl line 3

Client does not support authentication protocol requested by server; consider upgrading MySQL client at C:\\Perl\\pr_perl\\1.pl line 3.

:confused:
Название: У меня вопросик есть ....
Отправлено: arto от 14 Июня 2007, 08:56:21
какое слово в сообщении об ошибке вам непонятно?
Название: У меня вопросик есть ....
Отправлено: Starick от 14 Июня 2007, 08:58:40
Понятно-то все, а вот как боротся с этим ?
Название: У меня вопросик есть ....
Отправлено: arto от 14 Июня 2007, 09:04:44
"consider upgrading MySQL client" -- не оно?
Название: У меня вопросик есть ....
Отправлено: Starick от 14 Июня 2007, 09:08:55
Ну и ! SQL переставить, или чево ?
Название: У меня вопросик есть ....
Отправлено: Starick от 14 Июня 2007, 09:38:48
Значит мне тут не объяснят , что я не так делаю .... :(

жаль...
Название: У меня вопросик есть ....
Отправлено: arto от 14 Июня 2007, 10:01:22
"MySQL client"
Название: У меня вопросик есть ....
Отправлено: Starick от 14 Июня 2007, 11:37:45
MySQL client - это DBI чтоли ?
Название: У меня вопросик есть ....
Отправлено: arto от 14 Июня 2007, 11:54:07
это mysql клиентская библиотека
Название: У меня вопросик есть ....
Отправлено: Starick от 14 Июня 2007, 12:01:03
Блин :(
Ну скажите ЧТО МНЕ СДЕЛАТЬ ЧТОБЫ ЗАРАБОТАЛО.
Что поставить , что удалить , и.т.д.
Мне

Цитировать
arto:
это mysql клиентская библиотека


не о чем не говорит :(
Название: У меня вопросик есть ....
Отправлено: arto от 14 Июня 2007, 12:06:44
вам надо обратиться к своему системному администратору и попросить его обновить клиентскую библиотеку для mysql.
он и решит, как ему это сделать безболезненно -- обновить весь mysql, либо только клиентскую часть.
Название: У меня вопросик есть ....
Отправлено: Starick от 14 Июня 2007, 12:11:23
я на локальной машине, сам себе администратор :(
Название: У меня вопросик есть ....
Отправлено: arto от 14 Июня 2007, 12:38:10
1. попробуйте переставить DBD::mysql: perl -MCPAN -e "install DBD::mysql"
2. попробуйте поставить вашим менеджером пакетов mysql клиента.
3. http://dev.mysql.com/doc/refman/5.0/en/old-client.html
Название: У меня вопросик есть ....
Отправлено: Starick от 14 Июня 2007, 12:38:50
Переустановил полностью MySQL .
Поставил  mysql-5.0.27-win32
Новее не нашол, один фиг ту же ошибку выдает :(
Название: У меня вопросик есть ....
Отправлено: Starick от 14 Июня 2007, 12:50:52
Цитировать
arto:
1. попробуйте переставить DBD::mysql: perl -MCPAN -e "install DBD::mysql"


Это по моему для  *nix систем.
Название: У меня вопросик есть ....
Отправлено: Starick от 14 Июня 2007, 15:21:32
Все ! Заработала !

вот это
Цитировать
arto:
3. http://dev.mysql.com/doc/refman/5.0/en/old-client.html

 
помогло.

СПАСИБО ! :)