my %hash = (
  driver => [ grep $p{rdbms} eq $_, Alzabo::Driver->available ],
  rules  => scalar(grep $p{rdbms} eq $_, Alzabo::RDBMSRules->available) ? 'yes' : 'no',
  rules2 => scalar(grep $p{rdbms} eq $_, Alzabo::RDBMSRules->available),
);