cleaner way to set restore the UTF-8 flag for the output of SELECT queries

1 files changed, 1 insertions, 0 deletions

diff --git a/videomv.pl b/videomv.pl
index 2bc3313..dd66375 100755
--- a/videomv.pl
+++ b/videomv.pl
@@ -390,6 +390,7 @@ unless (defined $ignoredb_flag) {
     }
     $dbh = DBI->connect($dsn, $config{user}, $config{password})
                or die "Can't connect do database";
+    $dbh->do( "SET NAMES UTF8" ) or die "Error: Can't set names to UTF-8.\n";
 
     # Lookup for the file in the videodb database
     $RES =