my ($rdb) = ((defined($param{'DB'})) && ($param{'DB'})) ? $param{'DB'} : &openDatabase();

# to this: (BTW, Don't put parens around 'my' lvalues
# unless you want list context...)
my $rdb = $param{'DB'} || &openDatabase();