use Win32::API::Prototype;
ApiLink( 'kernel32.dll', 'HWND GetConsoleWindow()' ) || die;
ApiLink( 'user32.dll', 'BOOL ShowWindow( HWND hWnd, 
	int iCommand )' ) || die;
my $hWnd = GetConsoleWindow();
ShowWindow( $hWnd, 0x01 );