Perl Tk 在后台重复而不冻结应用程序

Question

我有使用中继器的Perl TK应用程序（MW-＆GT;重复）。

中继器正在调用一个函数，可以刷新GUI内部的一些TK对象。

此中继器功能需要一些时间来执行 - 因此将应用程序冻结了几秒钟。我还在哈希内部存储对象，因此我正在尝试在中继器中配置“复杂”数据结构。

我一直在寻找一种在后台执行此功能的方法（可能是线程？），但不幸的是我无法做到。

我知道我需要使用线程::共享。但是，当我试图将对象分配到哈希中时，它不会让我说“共享标量的无效价值”。

我尝试过的一个实验之一：

#main
our %hash :shared;
my %p,%p2;
$hash{$key} = \%p;
$hash{$key}{$key2} = \%p2;
$hash{$key}{$key2} = Button(...)

#inside the repeater - with threads
$hash{$key}{$key2}->configure(-text => "foo");

我在这里想念什么？

谢谢。