use strict;
use warnings;
use Win32::OLE;
use Win32::OLE::Const;

my $xl = Win32::OLE->new('Excel.Application');
my $xlConst = Win32::OLE::Const->Load('Microsoft Excel 8.0 Object Library');

#Add a workbook so the window doesn't autoclose
$xl->Workbooks->Add();

my $word = Win32::OLE->new('Word.Application');
my $wordConst = Win32::OLE::Const->Load('Microsoft Word 8.0');

#Set both visible to test
$word->{Visible} = -1;
$xl->{Visible} = -1;


#Minimize Word
$word->{WindowState} = $wordConst->{'wdWindowStateMinimize'};
#Maximize Excel
$xl->{WindowState} = $xlConst->{'xlMaximized'};