Date:
STRONG>By:
##
my $SQLText = "SELECT node_id, node_title, node_date, node_author, node_section, node_content
FROM nodes WHERE $Column like ?
ORDER BY node_date, node_title, node_author";
my $sth = $dbh->prepare($SQLText);
my $query = $sth->execute($SearchParam);
my $errno = $dbh->{'mysql_errno'};
my $error = $dbh->{'mysql_error'};
my $returnArray;
push @{$returnArray},
$_ while $_ = $sth->fetchrow_hashref();
my $template =
HTML::Template->new(filename => 'templates/mod-node.tmpl');
$template->param(
DisplayContent => $DisplayContent,
NEWBODY => $returnArray );
print $template->output;
####