| 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) |