From c8f9e3aa4ffd44d4cdf750e239325a4295c509cd Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem.moulin@ens-lyon.org>
Date: Tue, 28 Feb 2012 21:43:52 +0100
Subject: unicode, cont

---
 videorm.pl | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'videorm.pl')

diff --git a/videorm.pl b/videorm.pl
index 228317d..dceff84 100755
--- a/videorm.pl
+++ b/videorm.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl -w -CADSL
 
 # This program is free software. It comes without any warranty, to the
 # extent permitted by applicable law. You can redistribute it and/or
@@ -170,8 +170,6 @@ if (defined $config{dbi_misc}) {
 }
 my $dbh = DBI->connect($dsn, $config{user}, $config{password})
             or die "Can't connect do database.\n";
-$dbh->do( "set names utf8" ) or die;
-
 
 # Lookup for the file in the videodb database
 my $res = $dbh->selectall_arrayref ( "SELECT id FROM $config{prefix}videodata WHERE filename = ?",
-- 
cgit v1.2.3