blib/lib/App/Run.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 19 | 51 | 37.2 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
29 | 4 | 0 | 1 | @_ and $_[0] eq 'script' |
154 | 1 | 0 | 0 | blessed $app and $app->can('init') |
173 | 1 | 2 | 2 | @_ and (reftype($_[0]) // '') eq 'HASH' |
212 | 1 | 0 | 0 | blessed $app and $app->can('name') |
242 | 0 | 0 | 2 | blessed $app and $app->can('run') |
256 | 3 | 0 | 0 | blessed($_[0]) and $_[0]->isa('Log::Log4perl::Logger') |
line | l | !l | condition |
---|---|---|---|
83 | 0 | 0 | $self->version // '(unknown version)' |
94 | 0 | 0 | $$hash{$e} //= {} |
97 | 3 | 0 | reftype $hash || '' |
133 | 0 | 0 | $_ //= '' |
173 | 2 | 2 | reftype($_[0]) // '' |
242 | 6 | 0 | reftype $app // '' |
260 | 0 | 0 | reftype($_[0]) || '' |
271 | 0 | 3 | $$c{'layout'} || '%d{yyyy-mm-ddTHH::mm} %p{1} %c: %m{chomp}%n' |
289 | 0 | 3 | $$options{'loglevel'} || 'WARN' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
134 | 0 | 0 | 0 | $from || $self->name . '.*' |
140 | 0 | 2 | 0 | $$self{'options'}{$key} //= $value |
212 | 0 | 0 | 0 | $$self{'name'} //= $app->name |
242 | 4 | 0 | 2 | (reftype $app // '') eq 'CODE' or blessed $app and $app->can('run') |
260 | 3 | 0 | 0 | not $_[0] or (reftype($_[0]) || '') eq 'ARRAY' |