foreach my $row (@$array_ref)
{
  $hash{$row->[0]} = $row;
}