File Coverage

File:t/09-sql-insert.t
Coverage:100.0%

linestmtbrancondsubpodtimecode
1
1
1
1
1
24
3
8
use lib 'lib';
2
1
1
1
1
9
2
6
use strict;
3
1
1
1
1
8
14
7
use warnings;
4
5
1
1
1
1
11
3
13
use Test::More tests => 4;
6
1
1
9
BEGIN { use_ok('SQL::Insert'); }
7
8
1
13
my $insert = SQL::Insert->new;
9
1
9
$insert->insert( 'models' )
10       ->values( 'abc' => '"howdy"' );
11
12
1
8
is $insert->generate, <<_EOC_;
13insert into models values (abc, "howdy");
14_EOC_
15
16
1
6
is "$insert", <<_EOC_;
17insert into models values (abc, "howdy");
18_EOC_
19
20
1
17
$insert->cols('foo', 'bar');
21
22
1
13
is $insert->generate, <<_EOC_;
23insert into models (foo, bar) values (abc, "howdy");
24_EOC_
25