DB<100> @array = qw( 111 222 333 444 555 888 );
 => (111, 222, 333, 444, 555, 888)

  DB<101> @array2 = qw( acct1 acct2 acct3 acct4 acct5 acct8 );
 => ("acct1", "acct2", "acct3", "acct4", "acct5", "acct8")

  DB<102> @temp{@array}=@array2
 => ("acct1", "acct2", "acct3", "acct4", "acct5", "acct8")

  DB<103> @AoH = map { { $_ => $temp{$_} } } @array
 => (
  { 111 => "acct1" },
  { 222 => "acct2" },
  { 333 => "acct3" },
  { 444 => "acct4" },
  { 555 => "acct5" },
  { 888 => "acct8" },
)