use Win32::OLE;
$class = "Excel.Application";
$File = qq(c:\\temp\\Mytext.xls);
$Excel = Win32::OLE->GetActiveObject($Class);
$Excel->(Visible);