use strict;
use Win32::OLE qw(in with);
use Win32::OLE::Const 'Microsoft Excel';
$Win32::OLE::Warn = 3;                             
my $Excel = Win32::OLE->GetActiveObject('Excel.Application')
     || Win32::OLE->new('Excel.Application', 'Quit');   # get already active Excel                                                                              # application or open new
my $Book = $Excel->Workbooks->Open("F:\\property.doc"); # open Excel file

$Book->SaveAs("testtuut.xls");#请问这里的SaveAs有参数吗？具体可以定义到另存为的类型吗？例如说doc file另存为网页的html类型。我改怎么定义？？

close(Excel);

$Book->Close;