| blib/lib/Perinci/Sub/CoerceArgs.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 55 | 90 | 61.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 154 | 0 | 0 | 1 | eval { do { require Time::Duration::Parse::AsHash; $d = Time::Duration::Parse::AsHash::parse_duration($val) } } and not $@ |
| 214 | 0 | 0 | 1 | eval { do { require Time::Duration::Parse::AsHash; $d = Time::Duration::Parse::AsHash::parse_duration($val) } } and not $@ |
| line | l | !l | condition |
|---|---|---|---|
| 37 | 1 | 1 | $ENV{'TZ'} // 'UTC' |
| 50 | 1 | 2 | $4 // 0 |
| 1 | 2 | $4 // 0 | |
| 1 | 2 | $4 // 0 | |
| 0 | 3 | $ENV{'TZ'} // 'UTC' | |
| 90 | 1 | 2 | $4 // 0 |
| 1 | 2 | $4 // 0 | |
| 1 | 2 | $4 // 0 | |
| 130 | 1 | 1 | $4 // 0 |
| 1 | 1 | $4 // 0 | |
| 1 | 1 | $4 // 0 | |
| 0 | 2 | $ENV{'TZ'} // 'UTC' | |
| 174 | 2 | 0 | $1 || 0 |
| 2 | 0 | $2 || 0 | |
| 0 | 2 | $3 || 0 | |
| 0 | 2 | $4 || 0 | |
| 0 | 2 | $5 || 0 | |
| 0 | 2 | $6 || 0 | |
| 0 | 2 | $7 || 0 | |
| 198 | 1 | 0 | $d->{'years'} || 0 |
| 1 | 0 | $d->{'months'} || 0 | |
| 0 | 1 | $d->{'weeks'} || 0 | |
| 0 | 1 | $d->{'days'} || 0 | |
| 0 | 1 | $d->{'hours'} || 0 | |
| 0 | 1 | $d->{'minutes'} || 0 | |
| 0 | 1 | $d->{'seconds'} || 0 | |
| 227 | 0 | 1 | $1 // 0 |
| 0 | 1 | $2 // 0 | |
| 0 | 1 | $3 // 0 | |
| 1 | 0 | $4 // 0 | |
| 0 | 1 | $5 // 0 | |
| 0 | 1 | $6 // 0 | |
| 0 | 1 | $7 // 0 | |
| 248 | 0 | 1 | $d->{'years'} // 0 |
| 0 | 1 | $d->{'months'} // 0 | |
| 0 | 1 | $d->{'weeks'} // 0 | |
| 0 | 1 | $d->{'days'} // 0 | |
| 1 | 0 | $d->{'hours'} // 0 | |
| 1 | 0 | $d->{'minutes'} // 0 | |
| 0 | 1 | $d->{'seconds'} // 0 | |
| 321 | 20 | 20 | $arg_spec->{'x.perl.coerce_to'} // '' |
| 323 | 6 | 0 | $schema->[1]{'isa'} // '' |