my $ref = $dbh->selectcol_arrayref($query)
   or die("Unable to fetch blog name: ",
          $DBI::err || "Unknown database error",
          "\n");

$param{welcome} = $ref->[0];