Perl и многопоточность. Возвращение к програмированию

Да-да. Я снова начал програмировать на Perl. Хочу написать небольшой поисковичек по локальным ftp-ресурсам моей домашней сети. А прежде всего столкнулся с проблемой сканирования сети на предмет доступных ftp-серверов с разрешеным доступом для анонимуса. Набросав небольшой скриптец, запустив его — понял, что для сканирования сети 10/10 потребуется 5*255*255*63 = 20482875 секунд или больше 250 дней (-; и тогда я подумал: «к черту! а зачем придумали многопоточность?» к тому же моя домашняя FreeBSD 7.0 с двуядерным Xeon E3110 достаточно хорошо должна стправиться с такими приложениями. И я начал копать в эту сторону.

Для начала надо было пересобрать Perl с поддержкой многопоточности. Сделано.

Можно создавать потоки как с контролем за жизнью, так и без контроля (типа запустил и забыл).

В первом случае используем:

threads->create(&mySub,$param)->join;

А во втором:

threads->create(&mySub,$param)->detach;

Ежели нам надо запустить кучу тредов и не дать основному скрипту закончить работу до окончания работы потоков, можно использовать такую конструкцию:

foreach (1..$numThreads) {
threads->create(&mySub,$param);
};

foreach (threads->list) { $_->join; };

list — возвращает список потоков, для которых еще не применили join или detach.

Ну вот и основное, что я пользую нынче в многопоточных приложениях на Perl. Надеюсь, не последний пост на эту тему (-;

____

И еще:

Интересный SEO-блог Дмитриева Романа.

Дракасмит сделал RE: дизайн, а у Креативного кота глючит CuteFTP

8 Comments

  1. Pingback: Ап тИЦ 08.09.08 - Быстро однако - SEO блог, Заработок в интернете

  2. Pingback: Сегодня апдейт тИЦ | SEO 73: дневник вебмастера

  3. Pingback: Отчетик за неделю | mAdvertise.ru - Блог о маркетинге и манимэйкинге

  4. Pingback: Все от создания сайтов до раскрутки. » Архив сайта » Ап тИЦ 08.09.08 - Быстро однако

  5. Pingback: SEO с турбонаддувом » Что в чемодане?

  6. Booboancy

    Всем доброго времени суток…Если кто то ищет сервер Ventrilo для своего клана.
    У меня есть сервер Вентрило(арендованный) если кому нужен сервер могу отдать под клан, гильдию…
    Пишите мне в ICQ: 4664184

    P.S. Уважаемые модераторы и админитрация форума, прошу, если я запостил не в тот раздал, просьба перенести в нужный, Заранее спасибо.

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *