LWP 全局UserAgent如何用在多线程中?

zhh124

1. 在主程序重创建了一个LWP UserAgent, 并以此UA登陆网站.
my $ua         = LWP::UserAgent->new(agent => "Mozilla/4.0", keep_alive => 1);
my $cookie_jar = HTTP::Cookies->new(); #(file => "cookies.${user}.txt", autosave => 1);
login_task(); #登陆成功并update 全局UA.

2. 启动多线程,所有线程都使用全局UA的副本和服务器进行交互.
my $t1 = threads->create( \&abc );
my $t2 = threads->create( \&xyz );

3. 问题是如果abc 和 xyz update了cookie, 则彼此之间无法同步.

已经试验过 $ua 不能设置为共享变量, 不设置为共享变量则线程中的$ua 则无法保持一致.
难道只有将cookie保存,然后两线程中的 $ua 通过update cookie来保持一致吗?

斯文牛氓

为什么不考虑下anyevent http呢

zhh124

我不太懂事件驱动的编程方法,不过看了下anyevent的介绍, 感觉anyevent象是个调度器的作用,条件满足了就call 对应的call back 函数, call back函数完事后就退出, 把cpu控制权交出来是吧? windows系统就是事件驱动的,不过这有个问题就是如果某个call back太耗时间, 程序就会卡在那CB函数上面了是不? windows也常常这样~_~.

谢过 斯文牛氓

nsnake_cu

你这会引发线程安全问题，最好还是clone一下在使用，保持相对独立，cookie信息用共享的就行了，注意有写入读出操作时使用下变量锁

zhh124

嗯, Thanks nsnake_cu!