my %hash = map { $row->[ 6 ] => $row->[ 7 ] } @array;