line |
true |
false |
branch |
99
|
0 |
0 |
if (not $posix and $crontab =~ /^([^= \t]+)[ \t]*=[ \t]*\"(.*)\"[ \t]*$/s) { } |
|
0 |
0 |
elsif (not $posix and $crontab =~ /^([^= \t]+)[ \t]*=[ \t]*\'(.*)\'[ \t]*$/s) { } |
|
0 |
0 |
elsif (not $posix and $crontab =~ /^([^= \t]+)[ \t]*=(.*)/s) { } |
|
0 |
0 |
elsif (not $posix and $crontab =~ /^\@(\w+)[ \t]+(.*)/s and exists $atword{lc $1}) { } |
|
0 |
0 |
elsif (@bits = split(/[ \t]+/, $crontab, 5) and @bits == 5) { } |
122
|
0 |
0 |
if scalar @bits > 5 |
138
|
0 |
0 |
if (@_ == 2) { } |
148
|
0 |
0 |
if (length join(' ', @time_lines) <= 75) |
161
|
0 |
0 |
if (@command) { } |
162
|
0 |
0 |
if @command == 2 and $command[1] eq '' |
168
|
0 |
0 |
if (@command > 1) |
172
|
0 |
0 |
if ($command[0] =~ /^\*/s) { } |
|
0 |
0 |
elsif ($command[0] eq '') { } |
179
|
0 |
0 |
if ($filter) { } |
181
|
0 |
0 |
@command == 1 ? : |
204
|
0 |
0 |
unless ($posix) |
205
|
0 |
0 |
if ($bits[3] =~ /($month)/io) |
206
|
0 |
0 |
if ($bits[4] =~ /($dow)/io) |
211
|
0 |
0 |
if ($bits[$i] eq '*') { } |
|
0 |
0 |
elsif (not $posix and $bits[$i] =~ m[^\*/(\d+)$]s) { } |
|
0 |
0 |
elsif ($bits[$i] =~ /$atoms/iso) { } |
218
|
0 |
0 |
if ($thang =~ m[^(?:(\d+)|(?:(\d+)-(\d+)(?:/(\d+))?))$]s) { } |
219
|
0 |
0 |
if (defined $1) { } |
|
0 |
0 |
elsif (defined $4) { } |
237
|
0 |
0 |
if @unparseable |
250
|
0 |
0 |
if (scalar @bits != 5) |
280
|
0 |
0 |
unless $posix |
284
|
0 |
0 |
if (@{$bits[0];} == 1 and @{$bits[1];} == 1 and @{$bits[0][0];} == 1 and @{$bits[1][0];} == 1 and $bits[0][0][0] ne '*' and $bits[1][0][0] ne '*') { } |
292
|
0 |
0 |
if ($bits[0][0][0] == 0) { } |
297
|
0 |
0 |
$h > 12 ? : |
|
0 |
0 |
$h >= 12 ? : |
307
|
0 |
0 |
if ($bits[0][0][0] eq '*') { } |
|
0 |
0 |
elsif (@{$bits[0];} == 1 and $bits[0][0][0] == 0) { } |
|
0 |
0 |
elsif (not grep((@$_ > 1), @{$bits[0];})) { } |
308
|
0 |
0 |
if (1 == @{$bits[0][0];} or $bits[0][0][1] == 1) { } |
319
|
0 |
0 |
$bits[0][-1][0] == 1 ? : |
324
|
0 |
0 |
if (@$bit == 1) { } |
|
0 |
0 |
elsif (@$bit == 2) { } |
|
0 |
0 |
elsif (@$bit == 3) { } |
325
|
0 |
0 |
$$bit[0] == 1 ? : |
327
|
0 |
0 |
$$bit[1] == 1 ? : |
330
|
0 |
0 |
$$bit[2] == 1 ? : |
341
|
0 |
0 |
if ($bits[1][0][0] eq '*') { } |
342
|
0 |
0 |
if (1 == @{$bits[1][0];} or $bits[1][0][1] == 1) { } |
350
|
0 |
0 |
if (@$bit == 1) { } |
|
0 |
0 |
elsif (@$bit == 2) { } |
|
0 |
0 |
elsif (@$bit == 3) { } |
357
|
0 |
0 |
$$bit[2] == 1 ? : |
370
|
0 |
0 |
if ($bits[2][0][0] eq '*') { } |
372
|
0 |
0 |
if (1 == @{$bits[2][0];} or $bits[2][0][1] == 1) { } |
380
|
0 |
0 |
if (@$bit == 1) { } |
|
0 |
0 |
elsif (@$bit == 2) { } |
|
0 |
0 |
elsif (@$bit == 3) { } |
386
|
0 |
0 |
$$bit[2] == 1 ? : |
394
|
0 |
0 |
if (@hunks > 1 and not grep((!/^the /s), @hunks)) |
403
|
0 |
0 |
if ($bits[3][0][0] eq '*') { } |
404
|
0 |
0 |
if (1 == @{$bits[3][0];} or $bits[3][0][1] == 1) { } |
412
|
0 |
0 |
if (@$bit == 1) { } |
|
0 |
0 |
elsif (@$bit == 2) { } |
|
0 |
0 |
elsif (@$bit == 3) { } |
419
|
0 |
0 |
$$bit[2] == 1 ? : |
459
|
0 |
0 |
if ($bits[4][0][0] eq '*' and @{$bits[4][0];} == 1 || $bits[4][0][1] == 1) { } |
469
|
0 |
0 |
if ($time_lines[-2] eq 'every day of' and $time_lines[-1] eq 'every month') |
483
|
0 |
0 |
if (@$bit == 1) { } |
|
0 |
0 |
elsif (@$bit == 2) { } |
|
0 |
0 |
elsif (@$bit == 3) { } |
486
|
0 |
0 |
if ($$bit[0] eq '*') { } |
490
|
0 |
0 |
if ($$bit[1] eq 2) { } |
516
|
0 |
0 |
if ($time_lines[-2] eq 'every day of') { } |
519
|
0 |
0 |
if ($time_lines[-1] eq 'every month') { } |
559
|
0 |
0 |
unless $pretty_form{$1} |
570
|
0 |
0 |
if (grep /every|from/, @_) |
572
|
0 |
0 |
if @_ < 2 |
577
|
0 |
0 |
if @_ < 3 |
583
|
0 |
0 |
if (grep /every|from/, @_) |
585
|
0 |
0 |
if @_ < 2 |
590
|
0 |
0 |
if @_ < 3 |
596
|
0 |
0 |
unless defined $_[0] and 0 + $_[0] |
599
|
0 |
0 |
unless $n == int $n |
601
|
0 |
0 |
if $n == 11 or $n == 12 or $n == 13 |
603
|
0 |
0 |
if $n == 1 |
604
|
0 |
0 |
if $n == 2 |
605
|
0 |
0 |
if $n == 3 |
626
|
0 |
0 |
unless $ordinations{$i} |
647
|
0 |
0 |
if $i == 2 |
649
|
0 |
0 |
unless $ordinations{$i} |
664
|
0 |
0 |
if ($esc) { } |
665
|
0 |
0 |
unless $c eq '%' |
667
|
0 |
0 |
if $c eq '%' |
669
|
0 |
0 |
unless ($esc = $c eq '\\') |
675
|
0 |
0 |
if $esc |
676
|
0 |
0 |
if $need_newline |