CPAN::Groonga

     )->raw(0);
    is $sid1, $sid2, 'sids are equal';
    is $sid3, $sid4, 'sids are equal';
    isnt $sid1, $sid3, 'sids are not equal';


    $c1->call_lua('box.dostring',
    [
        q[
        

onnect;
    Coro::AnyEvent::sleep 0.5;

    my $dsid = $c1->call_lua('box.dostring', [ 'return sessions' ])->raw(0);
    is $sid3, $dsid, 'disconnect sid';
    isnt $sid1, $dsid, 'disconnect sid';

}

 [ 1, 'вася', 21 ]) }, undef, 'repeat';
like $@ => qr{Duplicate key exists}, 'error message';
isnt $tnt->last_code, 0, 'last_code';
like $tnt->last_error_string => qr{Duplicate key}, 'last_error_s

 [ 1, 'вася', 21 ]) }, undef, 'repeat';
like $@ => qr{Duplicate key exists}, 'error message';
isnt $tnt->last_code, 0, 'last_code';
like $tnt->last_error_string => qr{Duplicate key}, 'last_error_s

 }, 1, 'count of tuples';
            cmp_ok $r->{DATA}[0], '>', 0, 'box.session.id';
            isnt $r->{DATA}[0], $sid, 'the other session.id';
            $cv->end;
        });

        my $timer