use DBD::SQLite::Constants ':dbd_sqlite_string_mode';

my $dbh = DBI->connect( "dbi:SQLite:dbname=:memory:", "", "",
          {RaiseError => 1,
           AutoCommit => 1,
           sqlite_string_mode => DBD_SQLITE_STRING_MODE_UNICODE_STRICT
          });