Select Code to Download

foreach my $row ( @array ) {
    $hash{ $row->[ 6 ] } = $row->[ 7 ];
}

foreach my $i ( 0 .. $#array ) {
    $hash{ $array[ $i ][ 6 ] } = $array[ $i ][ 7 ];
}

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