my $OrigArray = $worksheet->Range("A76:B9107")->{'Value'};
for (@$OrigArray) 
{ 
	print ++$count, ":", join(",", @$_), "\n";	
}