blib/lib/DBIx/RunSQL.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 9 | 35 | 25.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
291 | 0 | 0 | 0 | defined $sth->{'NUM_OF_FIELDS'} and 0 < $sth->{'NUM_OF_FIELDS'} |
382 | 0 | 0 | 0 | $no_header_when_empty and not @$res |
402 | 0 | 0 | 0 | not $class->isa('Text::Table') and my $table = $class->can('table') |
507 | 2 | 0 | 2 | $sql and not -f $sql |
line | l | !l | condition |
---|---|---|---|
95 | 0 | 0 | $args{'sql'} ||= 'sql/create.sql' |
97 | 0 | 0 | $args{'options'} ||= {} |
269 | 0 | 0 | $args{'verbose_fh'} ||= \*STDOUT |
271 | 0 | 0 | $args{'verbose_handler'} ||= sub { $args{'verbose_fh'} ||= \*STDOUT; print {$args{'verbose_fh'};} "$_[0]\n"; } |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
377 | 0 | 0 | 0 | exists $options{'header'} || $options{'header'} |
394 | 0 | 0 | 0 | $class->can('table') or $class->can('new') |
506 | 1 | 1 | 2 | $sql ||= join(' ', @$argv) |
511 | 2 | 0 | 2 | $sql or @$argv |
544 | 1 | 3 | 0 | $opts->{'dsn'} ||= sprintf('dbi:SQLite:dbname=db/%s.sqlite', $appname) |