4 use Test::More tests => 5;
8 use lib "$FindBin::Bin/lib";
9 use Test::SQL::Abstract::Util qw/
16 use_ok('SQL::Abstract') or BAIL_OUT( "$@" );
18 my $sqla = SQL::Abstract->create(1);
22 tablespec => mk_name('test'),
25 mk_name(qw/hostname/),
28 mk_expr('+', mk_name(qw/me id/), mk_value(5)),
29 mk_value('localhost'),
32 ), "UPDATE test SET me.id = me.id + 5, hostnameme = localhost"