Gel de l'interface graphique - Perl Tk

Question

J'ai développé une petite application utilisant Perl/Tk. L'application va chercher des données sur le web lorsque l'un des boutons de l'application est pressé. Mais le problème est que l'interface graphique se bloque jusqu'à ce que le contrôle est retourné. Je sais que cela est dû à retarder la fenêtre principale ne répond pas. J'ai utilisé la fonction update() mais le problème persiste. Donc, je google autour et je sais que nous pouvons utiliser des discussions pour résoudre ce problème. Mais je ne suis pas sûr de savoir comment utiliser les threads dans Perl/Tk. Voici mon exemple de code

use warnings; 
use Tk; 

my $mw = new MainWindow; 

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

sub FetchData 
{ 
//Fetching data from Web 
} 

Merci d'avance.

Answer 1

N'ont jamais essayé ceci, mais ce PerlMonks thread from 2008 "Perl Tk and Threads" pourrait vous aider à aller de l'avant.