請教tk或win::gui

3chi01

代碼見：
http://www.venustech.com.cn/NewsInfo/124/687.Html

使用use tk，
點(diǎn)擊get hash from database 前界面顯示正常，運(yùn)行后界面的一篇空白了，要等運(yùn)行結(jié)束以后才能正常顯示，中途無法操作程序。請教各位大俠，此類問題有解決的方法嗎，萬分感謝！

自己做的其他幾個(gè)可視化腳本（包括使用 use win32::gui）也一樣問題，看了cpu使用率也不高。

[ 本帖最后由 3chi01 于 2008-9-10 12:58 編輯 ]

flw

GUI 就得多線程嘛。
你一個(gè)地方阻塞了，就沒有辦法處理 GUI 消息了嘛。

3chi01

原帖由 flw 于 2008-9-10 13:12 發(fā)表
GUI 就得多線程嘛。
你一個(gè)地方阻塞了，就沒有辦法處理 GUI 消息了嘛。

多謝flw專家的指點(diǎn)，搞了好多天（差點(diǎn)就放棄perl了），經(jīng)您一說終于明白了。我是初學(xué)，能具體給個(gè)簡單例子嗎（用use threads？fork？），或網(wǎng)上的教程也行，萬分感謝中。。。

[ 本帖最后由 3chi01 于 2008-9-10 13:21 編輯 ]

2gua

好久以前好像聽說Perl的多線程技術(shù)還不是很成熟。

hitsubunnu

use  POE

3chi01

多謝各位perl前輩指點(diǎn)迷津。感激不盡！

isaachs

原帖由 hitsubunnu 于 2008-9-10 20:58 發(fā)表
use  POE

你認(rèn)為POE對這種長時(shí)間的運(yùn)算有用嗎？
有空還是多看看《mastering perl tk》吧。

[ 本帖最后由 isaachs 于 2008-9-11 07:09 編輯 ]

hitsubunnu

原帖由 isaachs 于 2008-9-11 07:07 發(fā)表

你認(rèn)為POE對這種長時(shí)間的運(yùn)算有用嗎？
有空還是多看看《mastering perl tk》吧。

樓主的問題如下

運(yùn)行后界面的一篇空白了，要等運(yùn)行結(jié)束以后才能正常顯示，中途無法操作程序。

poe官方文檔中的例子  

http://poe.perl.org/?POE_Cookbook/Tk_Interfaces

可以在運(yùn)算相加過程中 根據(jù)需要隨時(shí) 將結(jié)果清零

所以  我認(rèn)為 用poe可以實(shí)現(xiàn)   

以下引用自網(wǎng)絡(luò)的一篇帖子

一．前言
至于POE的應(yīng)用，我不想多說什么，因?yàn)樾枰�使用狀態(tài)機(jī)的地方太多。舉一個(gè)極端的例子，windows下的perl-tk對于多線程的支持極不穩(wěn)定，如果在其中加入一個(gè)大數(shù)據(jù)量的處理應(yīng)用，結(jié)果往往會是一個(gè)無法動彈的程序。這時(shí)除了使用POE，也許沒有更好的解決辦法了。

isaachs

原帖由 hitsubunnu 于 2008-9-11 10:36 發(fā)表


樓主的問題如下

運(yùn)行后界面的一篇空白了，要等運(yùn)行結(jié)束以后才能正常顯示，中途無法操作程序。

poe官方文檔中的例子  

http://poe.perl.org/?POE_Cookbook/Tk_Interfaces

可以在運(yùn)算相加過程中  ...

那文章就我寫的，后來試過后改正了，可能被轉(zhuǎn)得不知哪里去了，CU里有個(gè)blog，里面關(guān)于perl的轉(zhuǎn)了蠻多我的，具體名字忘記了。以前沒搞清楚，你試試看就知道了，poe不過是模擬，終歸是一個(gè)線程，照樣塞得死死的。那個(gè)tk例子不一樣，不適合樓主的情況。

[ 本帖最后由 isaachs 于 2008-9-11 16:05 編輯 ]

hitsubunnu

原帖由 isaachs 于 2008-9-11 16:01 發(fā)表


那文章就我寫的，后來試過后改正了，可能被轉(zhuǎn)得不知哪里去了，CU里有個(gè)blog，里面關(guān)于perl的轉(zhuǎn)了蠻多我的，具體名字忘記了。以前沒搞清楚，你試試看就知道了，poe不過是模擬，終歸是一個(gè)線程，照樣塞得死死 ...

能給詳細(xì)講講不行的原因嗎？

你后來是通過什么辦法處理這樣的問題？