Help for this page
$excel->ActiveWorkbook->Close(0); $excel->Quit();
$excel = Win32::OLE->GetActiveObject('Excel.Application'); if ($@) { ... $book->SaveAs($excelfile); $excel->ActiveWorkbook->Close(0); $excel->Quit();