Branch Coverage

blib/lib/Venus/Cli.pm
Criterion Covered Total %
branch 120 170 70.5


line true false branch
57 0 17 unless $name
61 1 16 unless my $data = $self->get("arg", $name)
77 2 14 if ($_prompt and not @values && defined $values[0])
82 2 0 if (defined $_default and !(@values && defined $values[0]) || $values[0] eq '' and exists $data->{'default'})
90 0 0 $_ ? :
0 5 lc $_type eq 'boolean' ? :
5 11 if $_type
94 15 1 wantarray ? :
100 0 7 unless $name
102 1 6 unless my $data = $self->get("cmd", $name)
106 5 1 ($value // '') eq $name ? :
112 4 6 if $method
128 1 101 unless $key
252 0 0 $self->store('opt', $name, 'multi') ? :
345 0 12 if (my $description = $self->help_description)
350 0 12 if (my $header = $self->help_header)
355 6 6 if (my $arguments = $self->help_arguments)
360 2 10 if (my $options = $self->help_options)
365 2 10 if (my $commands = $self->help_commands)
370 0 12 if (my $footer = $self->help_footer)
382 0 6 unless my $data = $self->get("arg", $name)
393 1 5 if ($_multi)
401 6 0 if ($_help)
407 5 1 if ($_required) { }
418 1 5 if ($_type)
444 6 6 unless my $arguments = $self->help_args
460 0 2 unless my $data = $self->get("cmd", $name)
474 0 2 if ($_multi)
482 2 0 if ($_help)
488 2 0 if ($arg->{'name'})
514 10 2 unless my $commands = $self->help_cmds
522 12 0 unless my $description = $self->str("description")
530 12 0 unless my $footer = $self->str("footer")
538 12 0 unless my $header = $self->str("header")
554 0 2 unless my $data = $self->get("opt", $name)
573 0 0 if $_type and $type_map{$_type}
575 2 0 if ($_alias)
577 2 0 ref $_alias eq 'ARRAY' ? :
580 0 2 if ($_multi)
588 2 0 if ($_help)
594 0 2 if ($_required) { }
605 0 2 if ($_type)
617 10 2 unless my $options = $self->help_opts
643 6 6 if (my $has_args = $self->get("arg"))
644 0 6 keys %{$has_args;} > 1 ? :
652 1 5 if $_multi
653 5 1 if $_required
658 1 5 if $has_multi
659 1 5 unless $has_required
664 2 10 if (my $has_opts = $self->get("opt"))
665 0 2 keys %{$has_opts;} > 1 ? :
673 0 2 if $_multi
674 0 2 if $_required
679 0 2 if $has_multi
680 2 0 unless $has_required
703 0 17 unless $name
707 1 16 unless my $data = $self->get("opt", $name)
722 3 13 ref $parsed eq 'ARRAY' ? :
725 1 15 if ($_prompt and not @values && defined $values[0])
730 0 0 if (defined $_default and !(@values && defined $values[0]) || $values[0] eq '' and exists $data->{'default'})
738 0 0 $_ ? :
0 7 lc $_type eq 'boolean' ? :
6 10 if $_type
742 15 1 wantarray ? :
754 0 3 @values > 1 ? :
761 0 6 @values > 1 ? :
784 1 103 unless $key
956 5 0 @args ? :
1063 0 31 unless my $item = $self->store("opt", $order->{$index})
1071 21 10 if ($_alias)
1073 17 4 ref $_alias eq 'ARRAY' ? :
1084 6 25 if $_type
1085 5 26 if $_multi
1098 79 514 unless $key
1100 123 391 unless $name
1104 91 4 exists $config->{$key} && exists $config->{$key}{$name} ? :
95 296 unless @args
1113 17 60 exists $config->{$key} && exists $config->{$key}{$name} && exists $config->{$key}{$name}{$prop} ? :
77 219 unless @data
1129 0 77 unless $name
1153 6 0 if ($type)
1158 3 3 if (my $caught = $assert->catch("validate", $values[$i]))
1165 3 0 wantarray ? :
1181 0 30 if ($size + length($part) + 1 + $indent > $length) { }
1193 10 0 $indent ? :