$workbook = Spreadsheet::ParseExcel::SaveParser::Workbook->Parse('test.xls');

  my $worksheet = $workbook->AddWorksheet('New Sheet');
  $worksheet->AddCell(10, 1, 'New Cell');
  $workbook->SaveAs('iftest.xls');