my %found = map { $_ => 1 } @list;