GUI凍結 - Perl Tk

Question

我開發了一個使用Perl/Tk的小應用程序。當應用程序中的其中一個按鈕被按下時，應用程序將從網絡獲取數據。但問題在於GUI在控制返回之前會變得懸而未決。我知道這是由於延遲導致主窗口無響應。我使用了update（）函數，但問題仍然存在。所以我谷歌周圍，並知道我們可以使用線程來克服這個問題。但我不確定如何在Perl/Tk中使用線程。這裏是我的示例代碼

use warnings; 
use Tk; 

my $mw = new MainWindow; 

my $button = $mw -> Button(-text => "Fetch", 
     -command => \&FetchData) 
    -> pack(); 
MainLoop; 

sub FetchData 
{ 
//Fetching data from Web 
} 

在此先感謝。

Answer 1

從來沒有試過這個，但是這個PerlMonks thread from 2008 "Perl Tk and Threads"可能會幫助你開始。