in reply to Re^2: nonempty false list
in thread nonempty false list

There's also List::MoreUtils's any. 
any { $_ } @opts{qw( a b c )}

[download]

In Section Seekers of Perl Wisdom