blib/lib/DBIx/RunSQL.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 9 | 37 | 24.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
311 | 0 | 0 | 0 | defined $sth->{'NUM_OF_FIELDS'} and 0 < $sth->{'NUM_OF_FIELDS'} |
435 | 0 | 0 | 0 | $no_header_when_empty and not @$res |
455 | 0 | 0 | 0 | not $class->isa("Text::Table") and my $table = $class->can("table") |
562 | 2 | 0 | 2 | $sql and not -f $sql |
line | l | !l | condition |
---|---|---|---|
99 | 0 | 0 | $args{'sql'} ||= "sql/create.sql" |
101 | 0 | 0 | $args{'options'} ||= {} |
289 | 0 | 0 | $args{'verbose_fh'} ||= \*STDOUT |
291 | 0 | 0 | $args{'verbose_handler'} ||= sub { $args{'verbose_fh'} ||= \*STDOUT; print {$args{'verbose_fh'};} "$_[0]\n"; } |
412 | 0 | 0 | $options{'null'} // "" |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
419 | 0 | 0 | 0 | exists $options{'header'} || $options{'header'} |
447 | 0 | 0 | 0 | $class->can("table") or $class->can("new") |
561 | 1 | 1 | 2 | $sql ||= join(" ", @$argv) |
566 | 2 | 0 | 2 | $sql or @$argv |
601 | 1 | 3 | 0 | $opts->{'dsn'} ||= sprintf("dbi:SQLite:dbname=db/%s.sqlite", $appname) |