use Win32::GUI(); my $text;