![]() |
Модераторы: korob2001, ginnie |
![]() ![]() ![]() |
|
itrex111 |
|
|||
Новичок Профиль Группа: Участник Сообщений: 12 Регистрация: 30.1.2012 Репутация: нет Всего: нет |
Добрый день!
Возникла проблемка после cpan upgrade Операционка ubuntu 12.04 LTS perl 5.14.2 При запуске простого скрипта
Мне выдаётся ошибка ******************************************************************* Using the default of SSL_verify_mode of SSL_VERIFY_NONE for client is deprecated! Please set SSL_verify_mode to SSL_VERIFY_PEER together with SSL_ca_file|SSL_ca_path for verification. If you really don't want to verify the certificate and keep the connection open to Man-In-The-Middle attacks please set SSL_verify_mode explicitly to SSL_VERIFY_NONE in your application. ******************************************************************* at ./auto.pl line 7. Ругается вот на эту строку (line №7) $sock = IO::Socket::SSL->new($host) ; Подскажите как побороть, если кто сталкивался? Это сообщение отредактировал(а) itrex111 - 1.2.2013, 02:50 |
|||
|
||||
arto |
|
|||
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
# perl -MIO::Socket::SSL -e '$sock = new IO::Socket::SSL (''PeerAddr'' => $ARGV[0], ''PeerPort'' => "https", ''SSL_verify_mode'' => SSL_VERIFY_NONE) or die $!; $sock->print("HEAD / HTTP/1.1\r\nHost: $ARGV[0]\r\n\r\n"); print while (<$sock>)' www.google.com
HTTP/1.1 302 Found Location: https://www.google.fi/ Cache-Control: private Content-Type: text/html; charset=UTF-8 Set-Cookie: PREF=ID=5e8ed5754c204ddd:FF=0:TM=1359700649:LM=1359700649:S=FlAJXyMcvrq_wIDz; expires=Sun, 01-Feb-2015 06:37:29 GMT; path=/; domain=.google.com Set-Cookie: NID=67=uZ5gluNQVtTt6V764Xj21juVPEDppiJpXma5mf4PU8p06cwn8Cs-tEW6YBf5oDMzj2tioRDdetSapMnBJcfVEnqfamirgNDLOiRN6qOOUhtCCkBZT26a7AuB-uzl8_h7; expires=Sat, 03-Aug-2013 06:37:29 GMT; path=/; domain=.google.com; HttpOnly P3P: CP="This is not a P3P policy! See http://www.google.com/support/accounts/bin...p;answer=151657 for more info." Date: Fri, 01 Feb 2013 06:37:29 GMT Server: gws Content-Length: 219 X-XSS-Protection: 1; mode=block X-Frame-Options: SAMEORIGIN ^C # |
|||
|
||||
itrex111 |
|
|||
Новичок Профиль Группа: Участник Сообщений: 12 Регистрация: 30.1.2012 Репутация: нет Всего: нет |
Спасибо большое помогло!
|
|||
|
||||
![]() ![]() ![]() |
Правила форума "Perl" | |
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Perl: Общие вопросы | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |