open FILE, "list-of-emails-one-per-line.txt";
@emails{(array) chomp <FILE>} = (); # %emails is now a hash where each key is an email address
close FILE;