как реализовать многопоточность?! perl

Сабж. Вот скрипт:

Code:

#! usr/bin/perl

use strict;
use LWP;

my $url='http://by.ru/login.cgi';
my $browser=LWP::UserAgent->new;
my $response=$browser->post($url,
[ 'login'=>'login',
  'password'=>password',
  'p2'=>'',
]
);

$response=$response->as_string;
my $tt=$response=~m/Location:(.*)\.cgi/;
my $checktext='http://by.ru/panel';
if ($tt!=$checktext){
print "Valide Account";
}else{
print "No valide Account";
}

И накидайте ссылок про многопоточность в перл плз

 

Насяльника, а поиск уже не работает?

/showpost.php?p=231760&postcount=1

 

groundhog читал уже, тема не раскрыта

 

Хм... Да по-моему нормально написано... Дальше будут только вариации не тему:

http://nopox.wordpress.com/2007/10/06/multithreading-in-perl/

 

Вот интересное обсуждение:

http://forum.sources.ru/index.php?showtopic=81962

 

покажите если можно на примере данного скрипта....

 

Вот уж нет... Там всё понятно написано, одно дело помочь разобраться, и совсем другое "сделайте за меня". Я не сторонник такого подхода...

 

groundhog, дело в том что я и хочу разобратся !!! Я прошу лишь показать как это реализуется ! Можешь сделать это на примере другого МАЛЕНЬКОГО скрипта!

 

Вопрос решен! Спасибо всем кто помогал