my @names_with_no_email = map {$_->{email} eq '' ? $_->{name}:()} @$data;