use threads; use threads::shared;
use Win32::GUI();

my $text :shared;