[Cascavel-pm] Duvida sobre banco de dados

[Ricardo Stock]

Boa tarde a todos da lista. Dei uma boa olhado no script e como apontaram,
verifiquei dois erros, um de sintaxe e outro de falta de atenção.

agora me da um erro, no log apache na geração do html. na linha 14.. dizendo
o seguinte

Premature end of script headers: c:/apache/cgi-bin/test.cgi
No comma allowed after filehandle at c:\\APACHE\\CGI-BIN\\TEST.CGI line
14.\n

abaixo segue novamente o script corrigido... agora não sei mais onde possa 
estar havendo erros... espero a ajuda da lista.

#!c:\perl\bin\perl.exe
use CGI qw/:standart/;
use DBI();
$database="World";
$host="127.0.0.1";
$usuario="root";
$senha="123";

my $dbh =
DBI->connect("DBI:mysql:database=$database;host=$host","$usuario","$senha",{'RaiseError'
=> 1});

$sth = $dbh->prepare("SELECT * FROM artigos");
$sth->execute();

print header, start_html('Resultado da Busca'), h1("Itens Relacionados"); #
linha que da erro

while (($numero,$titulo,$conteudo) = $sth->fetchrow_array) {
       print p("$numero<br> $titulo<br>$conteudo<p><hr>");
      }

      $sth->finish();




Ricardo Stock
ricardostock em bol.com.br