use strict;
use OLE;

my $excel = CreateObject OLE "Excel.Application";
my $wrkbk = $excel -> Workbooks -> Open("C:/File.xls");
$excel -> {Visible} = 1;

##</code><code>##

use strict;
use OLE;

my $word = CreateObject OLE "Word.Application";
my $doc  = $word -> Documents -> Open("C:/File.doc");
$word -> {Visible} = 1;