--- index.cgi 2009/04/18 23:35:57 25 +++ index.cgi 2009/04/18 23:54:30 26 @@ -86,14 +86,15 @@ my $sth = $dbh->prepare( $sql ); $sth->execute( @data ); $t = time() - $t; - print qq|$t|; + print qq|$sql|; + print qq|
|, join(qq||, @cols), qq|
|; while ( my @row = $sth->fetchrow_array ) { my $n = shift @row; $n = 'NULL' unless defined $n; print qq||; } print qq|
|, join(qq||, @cols), qq|
$n|, join(qq||, @row), qq|
|; - print qq|$sql|; + print $sth->rows, qq| rows in $t s|; exit; }