code:
$book->SaveAs({Filename =>'D:\bharat\xxx.xls',FileFormat => xlExcel3});


error/warning message:
Unable to get the SaveAs property of the Workbook class

Win32::OLE(0.1712) error 0x800a03ec
    in METHOD/PROPERTYGET "SaveAs" at C:\Users\training\Desktop\New\tst.pl line
57.