use strict;
use Data::Sync;
use DBI;

my $db1 = DBI->connect("DBI:SQLite:dbname=db1");
my $db2 = DBI->connect("DBI:SQLite:dbname=db2");
my $sync = Data::Sync->new();

$sync->source($db1,{select=>"SELECT NAME,POSTALADDRESS,TELEPHONE FROM sourcetable WHERE CUSTOMERNO < 1000"});
$sync->target($db2,{table=>"targettable",index=>"FULLNAME");
$sync->mappings(NAME=>"FULLNAME",
		POSTALADDRESS=>"ADDRESS",
		TELEPHONE=>"HOMEPHONE");
$sync->run();


##</code><code>##

$sync->transformations(FULLNAME=>'s/(\w*?)\s+(\w*?)/$2,$1/');

##</code><code>##

$sync->buildattributes(dn=>'cn=%NAME%, ou=container,dc=testorg,dc=net',
			objectclass=>'organizationalPerson');