line |
true |
false |
branch |
73
|
1 |
11 |
unless ref $_[0] eq 'ARRAY' |
79
|
4 |
11 |
if (ref $step eq 'ARRAY') { } |
|
10 |
1 |
elsif (ref $step eq 'HASH') { } |
81
|
1 |
3 |
if @{$step;} != 1 |
83
|
2 |
1 |
unless (&looks_like_number($step->[0]) and int $step->[0] == $step->[0]) |
93
|
2 |
8 |
unless keys %{$step;} == 1 and exists $step->{'K'} |
96
|
1 |
7 |
unless ref $step->{'K'} eq 'ARRAY' |
99
|
1 |
6 |
unless @{$step->{'K'};} == 1 |
129
|
11 |
11 |
if (ref $_ eq 'ARRAY') { } |
|
10 |
1 |
elsif (ref $_ eq 'HASH') { } |
130
|
1 |
10 |
if ($step eq '-') { } |
133
|
1 |
9 |
unless $step eq abs int $step |
137
|
2 |
7 |
$_{'opts'}{'expand'} ? : |
|
2 |
7 |
if $step > ($_{'opts'}{'expand'} ? @{$_;} : $#{$_;}) |
140
|
1 |
6 |
if $last and $_{'opts'}{'insert'} |
145
|
1 |
6 |
if $last and $_{'opts'}{'delete'} |
149
|
2 |
1 |
unless exists $_->{$step} or $_{'opts'}{'expand'} |
162
|
1 |
30 |
unless defined $_[0] |
166
|
1 |
29 |
if shift @steps and substr($_[0], 0, 1) ne '/' |
172
|
22 |
17 |
if (&looks_like_number($_) or $_ eq '-') { } |