my $dbh = db_open();
my $id = ''; ## //Wird durch Param übergeben ...
my $stmt = q~SELECT id,name,text FROM test WHERE id=?~;
my $sth = $dbh->prepare( $stmt ) or die $dbh->errstr;
$sth->execute($id) or die $dbh->errstr;
while(my $row = $sth->fetchrow_hashref() ) {
$htc->param(
homename => $row->{'name'},
home => $row->{'text'}
);
} $dbh->disconnect();