I think demorgan got the best of you here. This is "all are undefined", not "at least one undefined". You want:

if (grep !defined($_), @hash{ qw(A B C) }) {
  # at least one undefined
}
[download]

-- Randal L. Schwartz, Perl hacker