my $Excel = Win32::OLE->GetActiveObject('Excel.Application')
    || Win32::OLE->new('Excel.Application', 'Quit');
my $Book = $Excel->Workbooks->Open("http://sharepoint/sites/CreditRiskIt/CRRF/Adhoc Business Reports/Daily GN Manual Checks/Gross Net Breaches 03 December 2008.xls");