LiteSync - Репликация и синхронизация SQLite

Для использования LiteSync с Perl мы должны сделать 2 вещи:

1. Замените предустановленную библиотеку SQLite на ту, которую мы скомпилировали, содержащую LiteSync.

2. Скомпилируйте DBD: SQLite, чтобы использовать установленный модуль SQLite:

wget http://search.cpan.org/CPAN/authors/id/I/IS/ISHIGAKI/DBD-SQLite-1.54.tar.gz

tar zxvf DBD-SQLite-1.54.tar.gz

cd DBD-SQLite-1.54

sed -i 's/if ( 0 ) {/if ( 1 ) {/g' Makefile.PL

perl Makefile.PL USE_LOCAL_SQLITE=0 SQLITE_LOCATION=/usr

make

sudo make install

Обратитесь в нашу поддержку

Затем мы можем нормально использовать модуль DBI / DBD: SQLite, передав специальный URI.

Пример кода:

use DBI;

my $dbh = DBI->connect("dbi:SQLite:uri=file:data.db?node=secondary&connect=tcp://server:port")

$dbh->do('CREATE TABLE t1 (id, name)');

$dbh->do('INSERT INTO t1 VALUES (1, "Hello World!")');

# wait for the new data to be replicated - only needed if the app will be closed

sleep(5);

print "done\n";