my $sth = $dbh->prepare( qw/ SELECT date, title, entry FROM News / );

$sth -> execute() or die "Couldn't execute statement: $DBI::errstr; stopped";

while ( my ($date, $title, $entry) = $sth->fetchrow_array() ) {
        print STDOUT "Date: $date  Title: $title  Entry: $entry\n";
}