-35, -39, -39, -60, -35, -39, -39,
-36, -40, -40, -59, -36, -40, -40,

##</code><code>##

use Spreadsheet::Read;
our $workbook = ReadData("tmp.xls", debug => 9);
my ($i,$j)=0;
my @cell;
for($i=1;$i<3;$i++){
	for($j=1;$j<7;$j++){
		$cell[$j] = cr2cell($j, $i); 
		print $workbook->[1]{$cell[$j]};
		print ",";
	}	
	print "\n";
}

##</code><code>##

$Options = {
             'debug' => 9,
             'strip' => 0,
             'rc' => 1,
             'cells' => 1,
             'dtfmt' => 'yyyy-mm-dd',
             'clip' => 1,
             'attr' => 0
           };
,,,,,,
,,,,,,