| line |
true |
false |
branch |
|
44
|
61 |
16 |
if $class->can('_init') |
|
58
|
23 |
10 |
unless (${"${class}::imported";}) |
|
65
|
17 |
4 |
if (not ${"${class}::wrapper";} and $class ne 'DBI::Easy' and not ${"${class}::imported";}) |
|
79
|
6 |
11 |
if $class->is_collection |
|
84
|
0 |
17 |
if not $class->dbh or $class->dbh eq '0E0' |
|
87
|
0 |
17 |
unless $class->_init_make_accessors |
|
103
|
0 |
33 |
if defined $class::SUPER |
|
123
|
6 |
11 |
if ($pack_chunks[-1] eq 'Collection') { } |
|
|
0 |
11 |
elsif ($pack_chunks[-1] eq 'Record') { } |
|
143
|
2 |
15 |
if $ref->can('common_table_prefix') |
|
146
|
17 |
0 |
unless $ref->can('table_name') |
|
153
|
17 |
0 |
unless $ref->can('column_prefix') |
|
174
|
6 |
0 |
unless ($rec_pkg) |
|
184
|
0 |
6 |
unless (try_to_use($rec_pkg)) |
|
185
|
0 |
0 |
unless try_to_use($rec_pkg . '::Record') |
|
205
|
17 |
0 |
unless ($have_vendor_pack) |
|
207
|
0 |
17 |
unless try_to_use_quiet($vendor_pack) |
|
252
|
32 |
49 |
if (defined $column_prefix and $column_prefix ne '' and $col_name =~ /^$column_prefix(.*)/i) |
|
266
|
0 |
81 |
if ($$col_meta{'type_name'} eq 'ENUM' and $#{$$col_meta{'mysql_values'};} >= 0) |
|
274
|
17 |
64 |
if (exists $$col_meta{'X_IS_PK'} and $$col_meta{'X_IS_PK'} == 1) |
|
276
|
0 |
17 |
if ($pri_key) { } |
|
299
|
44 |
3 |
unless (@_) |
|
308
|
0 |
3 |
if @_ > 1 |
|
317
|
1 |
0 |
unless (@_) |
|
327
|
0 |
1 |
unless @_ == 1 |
|
355
|
0 |
81 |
if (defined $type and $H->is_rich_type($type)) |
|
403
|
17 |
0 |
unless $$sth{'Executed'} |
|
426
|
5 |
76 |
if (defined $default_val) |
|
437
|
0 |
17 |
if ($real_row_count == 0) |
|
445
|
0 |
17 |
if $class->_dbh_error($@) |
|
464
|
17 |
0 |
if ($sth) |
|
465
|
17 |
0 |
unless $$sth{'Executed'} |
|
485
|
0 |
17 |
if ($real_row_count == 0) |
|
491
|
0 |
17 |
if $class->_dbh_error($@) |
|
505
|
102 |
0 |
unless $error |
|
510
|
0 |
0 |
if ($DBI::Easy::ERRHANDLER and ref $DBI::Easy::ERRHANDLER eq 'CODE') { } |
|
518
|
0 |
0 |
if ($$self{'in_transaction'}) |
|
540
|
107 |
0 |
if ($dir eq 'fields2cols') { } |
|
|
0 |
0 |
elsif ($dir eq 'cols2fields') { } |
|
544
|
41 |
66 |
unless $values |
|
550
|
0 |
0 |
unless $values |
|
556
|
28 |
79 |
unless ref $values |
|
559
|
79 |
0 |
unless ($in_place) |
|
565
|
0 |
84 |
unless exists $$entities{$_} or /^[_:-]\w+$/ |
|
568
|
1 |
83 |
if (/^:\w+$/) |
|
569
|
1 |
0 |
unless ($in_place) |
|
576
|
0 |
83 |
unless defined $column_prefix |
|
584
|
0 |
83 |
if ($in_place) |
|
593
|
73 |
10 |
if ($column_prefix eq '') { } |
|
|
3 |
7 |
elsif ($column_prefix eq '_' and ref $value and ref $value eq 'HASH' and keys %$value == 1) { } |
|
607
|
0 |
83 |
unless exists $$ent{$ent_key} |
|
613
|
79 |
0 |
unless $in_place |