Имя пользователя:
Пароль:
 

Название темы: Вопрос по Perl
Показать сообщение отдельно
mar mar вне форума

Аватара для mar

just mar


Moderator


Сообщения: 3906
Благодарности: 165

Профиль | Отправить PM | Цитировать


а что за система? я у себя на родном сервере Perl-скрипты запускаю кроном (crond),  а дальше можно так, например

#!/usr/local/bin/perl5
use IO::Socket;

$doc="/dir/doc";
$remote = IO::Socket::INET->new (Proto=> "tcp",
                                PeerAddr => "www.qq.com",
                                PeerPort => "8101",
                                or die "cannot connect to http port at localho
st";
print $remote "GET $doc HTTP/1.0\n\n";
$m="";
while (<$remote>
{
...........
}
close $remote;        

Добавлено:

ЗЫ а под Windows тоже есть shedular вместо Unix-овского cron-а
или твой скрипт сам должен быть сервисом (демоном)

Отправлено: 15:32, 04-12-2002 | #5

Название темы: Вопрос по Perl