my %in_subset = map { $_ => 1 } @subset; # Set the value 1 for each key in @subset