{
  my %hash;
  @hash{@array} = ();
  $same = (1 == keys %hash);
}