# HG changeset patch # User Heiko Schlittermann # Date 1252506782 -7200 # Node ID 68f8a7003db3a12a975d3de3ba4fc5bcfbbbfa2f # Parent 0f25345e3bf97bb14af6c2c0357e588ae8003312 fixed DBI connection setup diff -r 0f25345e3bf9 -r 68f8a7003db3 log.pl --- a/log.pl Tue Sep 08 23:22:59 2009 +0200 +++ b/log.pl Wed Sep 09 16:33:02 2009 +0200 @@ -152,10 +152,8 @@ if ($opt_db) { END { $Dbh->disconnect() if $Dbh; } - $Dbh = DBI->connect($DSN, $USER, $PW, { RaiseError => 0 }); - if (!$Dbh or !$Dbh->connected) { - warn $DBI::errstr; - } + $Dbh = DBI->connect($DSN, $USER, $PW, { RaiseError => 0 }) + or warn $DBI::errstr; } # Temporärfile öffnen