| blib/lib/Mojolicious/Commands.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 33 | 35 | 94.2 |
| line | l | !l | condition |
|---|---|---|---|
| 47 | 17 | 19 | $module = _command("${_}::$name", 1) and last |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 34 | 1 | 24 | 2 | not $ENV{'MOJO_NO_DETECT'} and my $env = $self->detect |
| 37 | 4 | 3 | 20 | $name and $name =~ /^\w[\w-]+$/u |
| 7 | 1 | 19 | $name and $name =~ /^\w[\w-]+$/u and $name ne 'help' || $args[0] | |
| 4 | 1 | 3 | $name and $name ne "help" | |
| 5 | 1 | 2 | $name and $name ne "help" and $name ne "--help" | |
| 2 | 1 | 1 | $name and $name ne "help" and $name ne "--help" and $name ne "-h" | |
| 99 | 35 | 17 | 0 | $fatal && ref $e |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 21 | 1 | 1 | 93 | defined $ENV{'PATH_INFO'} or defined $ENV{'GATEWAY_INTERFACE'} |
| 37 | 17 | 2 | 1 | $name ne 'help' || $args[0] |
| 41 | 3 | 2 | 14 | $ENV{'MOJO_HELP'} || $help |
| 69 | 62 | 67 | 0 | $all{substr $_, length "${ns}::"} //= $_->new->description |