use GTK2;
...
my $pid = open my $kid, "threadScript |"  or die $!;
...