use huff::WelcomeMessage; my $driver = MT::Entry->driver; my $dbh = $driver->{dbh}; my $query = "SELECT Name from NGBlogWelcome"; my $welcome = pop(@{$dbh->selectcol_arrayref($query)}); $param{welcome} = $welcome;