Condition Coverage

lib/SQL/Admin/Driver/Pg/DBI.pm
Criterion Covered Total %
condition 0 8 0.0


or 2 conditions

line l !l condition
372 0 0 $$map{$oid} ||= {-'name', lcws($$row{'table_name'}), -'schema', lcws($$row{'table_schema'}), -'column_list', []}

or 3 conditions

line l !l&&r !l&&!r condition
65 0 0 0 $$self{'parser'} ||= 'SQL::Admin::Driver::Pg::Parser'->new
366 0 0 0 $$self{'TCM'} ||= do { my $map = {}; my $sth = $self->execute($self->_query_table_column(@schemas)); while (my $row = $sth->fetchrow_hashref) { do { my $oid = $$row{'table_oid'}; $$map{$oid} ||= {-'name', lcws($$row{'table_name'}), -'schema', lcws($$row{'table_schema'}), -'column_list', []}; $$row{'column_name'} = lcws($$row{'column_name'}); $$map{$oid}{$$row{'column_number'}} = $$row{'column_name'}; push @{$$map{$oid}{-'column_list'};}, $row }; } ; $sth->finish; $map }