blib/lib/DBIx/RunSQL.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 9 | 33 | 27.2 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
280 | 0 | 0 | 0 | defined $sth->{'NUM_OF_FIELDS'} and 0 < $sth->{'NUM_OF_FIELDS'} |
368 | 0 | 0 | 0 | $no_header_when_empty and not @$res |
388 | 0 | 0 | 0 | not $class->isa('Text::Table') and my $table = $class->can('table') |
493 | 3 | 0 | 3 | $sql and not -f $sql |
line | l | !l | condition |
---|---|---|---|
94 | 0 | 0 | $args{'sql'} ||= 'sql/create.sql' |
258 | 0 | 0 | $args{'verbose_fh'} ||= \*STDOUT |
260 | 0 | 0 | $args{'verbose_handler'} ||= sub { $args{'verbose_fh'} ||= \*STDOUT; print {$args{'verbose_fh'};} "$_[0]\n"; } |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
363 | 0 | 0 | 0 | exists $options{'header'} || $options{'header'} |
380 | 0 | 0 | 0 | $class->can('table') or $class->can('new') |
492 | 1 | 2 | 3 | $sql ||= join(' ', @$argv) |
497 | 3 | 0 | 3 | $sql or @$argv |
530 | 1 | 5 | 0 | $opts->{'dsn'} ||= sprintf('dbi:SQLite:dbname=db/%s.sqlite', $appname) |