ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
31.03.2009, 18:46
|
|
Постоянный
Регистрация: 05.07.2008
Сообщений: 555
Провел на форуме:
3134311
Репутация:
1467
|
|
Сообщение от serg88
товарищи спецалисты в пхп .. помогите нубу установить чат бородина на хосте
https://forum.antichat.ru/showpost.php?p=1200576&postcount=3
/////.
а причём Perl?.. 
|
|
|
31.03.2009, 21:32
|
|
Участник форума
Регистрация: 31.10.2007
Сообщений: 193
Провел на форуме:
2080216
Репутация:
150
|
|
Народ есть ли в Perl альтернатива file_get_content как в PHP
|
|
|
|
31.03.2009, 21:58
|
|
Постоянный
Регистрация: 11.03.2008
Сообщений: 347
Провел на форуме:
2075230
Репутация:
462
|
|
Сообщение от Sleep
Народ есть ли в Perl альтернатива file_get_content как в PHP
можно так
Код:
$answer->content =~ //
или так:
Код:
if(index($answer->content,"")>-1)
Последний раз редактировалось ph1l1ster; 31.03.2009 в 22:32..
|
|
|
|
01.04.2009, 01:17
|
|
Познавший АНТИЧАТ
Регистрация: 01.05.2006
Сообщений: 1,021
Провел на форуме:
3424739
Репутация:
921
|
|
Сообщение от Sleep
Народ есть ли в Perl альтернатива file_get_content как в PHP
кури LWP
|
|
|
|
01.04.2009, 05:08
|
|
Участник форума
Регистрация: 12.03.2008
Сообщений: 159
Провел на форуме:
912928
Репутация:
137
|
|
Посылаю запрос, только сервер не яндекс, я поменял, чтобы остаться в тайне -_-. Авторизацию по куки, поэтому отправляю туда свои куки. Почему в ответе только <html>?
Когда я посылаю тот же самый запрос через плагин для мазилы (Live Headers), то открывается вполне полная страница.
Спасибо
 |
|
|
|
01.04.2009, 10:15
|
|
Постоянный
Регистрация: 05.07.2008
Сообщений: 555
Провел на форуме:
3134311
Репутация:
1467
|
|
Сообщение от Sleep
Народ есть ли в Perl альтернатива file_get_content как в PHP
Имеется ввиду file_get_contents? Если да, то, насколько я понял, эта функция имеет 2 назначения - побайтное чтение файла и чтение какого-либо URL.
Для первого случая в Perl используется read. Посмотреть можно здесь - http://www.arininav.ru/js/perl11.htm.
Во втором случае используется модуль LWP:
$url = 'http://vkontakte.ru';
use LWP::UserAgent;
$ua = LWP::UserAgent -> new();
$req = HTTP::Request -> new(GET => "$url");
$response = $ua -> request($req);
$page = $response -> content;
print "$page";
|
|
|
|
01.04.2009, 10:23
|
|
ветеран
Регистрация: 22.06.2004
Сообщений: 2,128
Провел на форуме:
5355463
Репутация:
2258
|
|
zavra, зачем там POST запрос то? нука, попробуй GET
__________________
Моня тот еще зверюга,
Свиду тихий внутри - ****,
Без обид,реальный мэн,
Просто рифмы нет совсем.
С ним шутить *****то очень,
В ирце вместе с ним хохочем (c) m0Hze
|
|
|
|
01.04.2009, 10:49
|
|
Постоянный
Регистрация: 15.06.2008
Сообщений: 941
Провел на форуме:
5111568
Репутация:
2399
|
|
PHP код:
$header = "GET http://yandex.ru/login HTTP/1.1\r\n".
"Host: yandex.ru\r\n".
"..........\r\n".
"Content-Length: 0\r\n\r\n";
примерно так, хотя
http://yandex.ru/login 404) |
|
|
|
01.04.2009, 21:30
|
|
Участник форума
Регистрация: 12.03.2008
Сообщений: 159
Провел на форуме:
912928
Репутация:
137
|
|
|
|
|
|
01.04.2009, 21:56
|
|
Постоянный
Регистрация: 11.03.2008
Сообщений: 347
Провел на форуме:
2075230
Репутация:
462
|
|
Код:
if ($answ=~m/Коментарии <i>\((\d+)\)<\/i>/ ){ print "$com";}
а лучше сделай так:
Код:
my @com = $get->content =~ /Коментарии <i>\((\d+)\)<\/i>/g;
print join "\n", @com;
п.с нафига в скриншоте то?!
Последний раз редактировалось ph1l1ster; 01.04.2009 в 21:59..
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
