eval { $excel = Win32::OLE->GetActiveObject( 'Excel.Application' ) };
eval { $workbook = $excel->Workbooks->Open($hist_full)};
$worksheet = $workbook->Worksheets($wksh_no);
$$ref_cell_array = $worksheet->range($excel_data_range)->{'value'};
$close_res = $workbook->Close();