#wait for data, print data to GUI textbox while(Win32::GUI::DoEvents() != -1) { my $tmptxt = $DataQueue->dequeue(); ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ $main_text_window->Append($tmptxt); }