Branch Coverage

blib/lib/Cron/Sequencer/CLI.pm
Criterion Covered Total %
branch 57 58 98.2


line true false branch
31 20 138 if ($item eq '--') { }
19 119 elsif ($item =~ /\A--json(?:=(.*)|)\z/su and not @groups) { }
41 15 4 if (length $1) { }
45 1 19 unless $known_json{$opt}
50 2 3 if $json->{'seq'} and $json->{'split'}
66 0 37 unless (&GetOptionsFromArray($groups[0], \%global_options, "show=s", "from=s", "to=s", "hide-env", "group!"))
83 4 50 unless (&GetOptionsFromArray($group, \%options, "env=s\@", "ignore=s\@"))
91 2 2 if $global_options{'hide-env'} and $options{'env'}
96 1 29 unless @input
101 10 19 if $json
112 27 62 if (defined $options->{'from'} or defined $options->{'to'}) { }
114 2 25 if defined $options->{'show'}
118 9 16 if ($from =~ /\A[1-9][0-9]*\z/u) { }
11 5 elsif ($from =~ /\A[-+](?:0|[1-9][0-9]*)\z/u) { }
130 1 4 unless (defined $start)
153 10 14 if ($to =~ /\A[1-9][0-9]+\z/u) { }
11 3 elsif ($to =~ /\A\+[1-9][0-9]*\z/u) { }
166 1 2 unless (defined $end)
174 1 22 if $end <= $start
178 12 50 if ($show =~ /\A\s*(last|this|next)\s+(minute|hour|day|week)\s*\z/u) { }
4 46 elsif ($show =~ /\A\s*(last|next)\s+([1-9][0-9]*)\s+(minute|hour|day|week)s\s*\z/u) { }
2 44 elsif ($show =~ /\A\s*yesterday\s*\z/u) { }
39 5 elsif ($show =~ /\A\s*(today|tomorrow)\s*\z/u) { }
3 2 elsif ($show =~ /\A(?:last|this|next)\z/u) { }
182 4 8 if ($which eq 'last') { }
187 4 4 if $which eq "next"
202 2 2 if ($which eq 'last') { }
218 2 37 if $1 eq "tomorrow"
231 1 1 unless (defined $midnight)