use strict;
use Win32::GUI;

my $Window = Win32::GUI::GetPerlWindow();

sleep(5);
Win32::GUI::Hide($Window);
sleep(5);
Win32::GUI::Show($Window);