while(1){
			 $display->Show();
			 $display->SelectAll();
			 $display->Clear();
			 $display->Update();
			 $display->Append($text);
			 $display->Update();
			 sleep(10);
			}
			 Win32::GUI::Dialog();