my $rowOneCells = $cell[0];  #get row one as new arrayref

my $rowOne = join (", ",   @{$rowOneCells}  );