Select Code to Download

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
+),
);