# perl program to write values into an MS Excel spreadsheet
# written by W. Summers; May 16, 1999

use OLE;

$excel = CreateObject OLE 'Excel.Application.5'	
	or warn "Couldn't create new instance of Excel App!!";
$excel->Workbooks->Open( 'test.xls' );
$excel->Workbooks(1)->Worksheets('Sheet1')->Cells(1,2)->{Value} = 'foo';
$excel->Workbooks(1)->Worksheets('Sheet1')->Range("B1")->{Value} = 'bar';
$excel->Save();
$excel->Quit();