| blib/lib/App/optex/pingu.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 6 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 349 | 0 | 0 | 0 | @$argv and not $App::optex::pingu::argv->[0] =~ /^-M/u |
| 0 | 0 | 0 | @$argv and not $App::optex::pingu::argv->[0] =~ /^-M/u and defined(my $i = &first(sub { $App::optex::pingu::argv->[$_] eq "--"; } , keys @$argv)) |