А на чем он работает и сам скрипт можешь показать?
на тебе шаблон скрипта на перле :
Код:
use LWP::UserAgent;
use HTTP::Request;
use HTTP::Request::Common;
use HTTP::Response;
@list = ("uns","am"); #####список чего-то
$ua = LWP::UserAgent->new;
foreach $s (@list)
{
$sURL = 'http://ds.destinysphere.ru/ds/'.$s.'/'; ##### а тут делаем урлик
print "--".$sURL."--\n";
$request = HTTP::Request->new(GET => $sURL);
$response = $ua->request($request);
if ($response->is_success) {
print $response->content;
} else {
$err = $response->as_string;
if ($err =~ /(.*)\n/)
{
print ($1, "\n");
}
}
print ("------\n");
}
ставишь себе стандартный Active Perl и вперед
если пишет что-то типа
Код:
--http://ds.destinysphere.ru/ds/Hintermit/--
HTTP/1.1 404 Not Found
то значит этот адрес не проканал
_________________ ...IMHO... [img]http://keep4u.ru/imgs/b/061214/643d61a12925bb575c.gif[/img]
[size=75][color=yellow]-=#[/color] [color=orange]Главный Археолог [/color] [color=blue]UN[/color] [color=yellow]#=-[/color][/size]
... Все мои высказывания я тестирую на себе ...
Последний раз редактировалось vass_yubi Сб янв 06, 2007 2:37, всего редактировалось 1 раз.
Мдя, мне такой скриптик негде запустить, лучше на С написать
ой та ладно! локально на раз запускается.
49 мб для ActivePerl-а и всё.
_________________ ...IMHO... [img]http://keep4u.ru/imgs/b/061214/643d61a12925bb575c.gif[/img]
[size=75][color=yellow]-=#[/color] [color=orange]Главный Археолог [/color] [color=blue]UN[/color] [color=yellow]#=-[/color][/size]
... Все мои высказывания я тестирую на себе ...
Совсем крыша поехала... какие-то шапочки, скрипты... Я уже ни во что не врубаюсь. Надеюсь, решение квеста будет стоить вылупившихся глаз от прочтения 218 страниц полного гонева...
Последний раз редактировалось viki77 Сб янв 06, 2007 2:41, всего редактировалось 1 раз.
Зарегистрирован: Сб май 01, 2004 4:57 Сообщения: 316
Цитата:
Совсем крыша поехала... какие-то шапочки, скрипты... Я уже ни во что не врубаюсь. Надеюсь, решение квеста будет стоить вылупившихся глаз от прочтения 218 страниц полного гонева...
Решени может и будет, а вот его отсутствие точно кайфа не прибавит.
хотя я от квеста не ожидал ни сферок, ни елок, ни телок, то меня пропажа Шапки Всея Сфер поулыбала, я доволен квестом
_________________ http://dshelp.info - DSПомощник для DS
icq: 48-13-47
Активность в игре:
[url=http://dshelp.info/][img]http://dshelp.info/orion/Phantom48/graph.jpg[/img][/url]
Мдя, мне такой скриптик негде запустить, лучше на С написать
ой та ладно! локально на раз запускается.
49 мб для ActivePerl-а и всё.
я на хосте запускал, зачем еще домашний канал грузить
не вопрос можно откуда угодно запускать - бы ли библиотеки (хотя можно тупо сокетами и без библиотек, но ИМХО это уже изврат). Ну и локально отлаживать легче.
_________________ ...IMHO... [img]http://keep4u.ru/imgs/b/061214/643d61a12925bb575c.gif[/img]
[size=75][color=yellow]-=#[/color] [color=orange]Главный Археолог [/color] [color=blue]UN[/color] [color=yellow]#=-[/color][/size]
... Все мои высказывания я тестирую на себе ...
Сейчас этот форум просматривают: нет зарегистрированных пользователей и 84 гостя
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете добавлять вложения