$ echo 'create table foo (quux text);' | sqlite3 nikita-dubrovin.db
$ echo 'insert into foo (quux) values ("1984г1ф!!11четыре");' | sqlite3 nikita-dubrovin.db
$ perl -C -Maliased=DBIx::Class::Schema::Loader -e'
    Loader->naming("current");
    my $d = Loader->connect("DBI:SQLite:nikita-dubrovin.db", undef, undef, { sqlite_unicode => 1 });
    print $d->resultset("Foo")->first->quux;
'
1984г1ф!!11четыре