lib/DBMerge.pm 

sub do_merge {
    my $class = shift;

    my $self = $class->new(@_);
    $self->handle_each_table;
    $self->check_unconverted;
    return $self->check_errors;
}