map {my $range = 'A'.$count.':B'.$count; $sheet->Range($range)->{'Value'} = $_; $count++;} @$retrieve_ref;