line |
true |
false |
branch |
174
|
1 |
40 |
if (ref $order eq 'ARRAY') { } |
256
|
2 |
14 |
if ($self->size != @original) |
260
|
3 |
11 |
unless $self->size |
263
|
1 |
10 |
if ($self->orientation ne 'down') |
270
|
5 |
260 |
unless $deck[$_] eq $original[$_] |
325
|
14 |
4 |
$self->orientation eq 'down' ? : |
380
|
3 |
37 |
if (wantarray and @_ > 1) { } |
392
|
5 |
1 |
if (exists $expressions->{$param}) { } |
408
|
36 |
6 |
exists $expressions->{$param} ? : |
415
|
262 |
1594 |
if (&any(sub {
$card =~ /$_/;
}
, @expressions)) |
444
|
2 |
5 |
unless (defined $times) |
448
|
2 |
5 |
if $times < 1 |
452
|
1 |
4 |
$times > 1 ? : |
487
|
9 |
9 |
if (&looks_like_number($param)) { } |
495
|
7 |
8 |
unless @number_of_cards |
499
|
1 |
7 |
unless $number_of_cards > 0 |
505
|
2 |
5 |
if ($where_to_drop eq 'drop-top') { } |
538
|
1 |
3 |
$times > 1 ? : |
553
|
29 |
90 |
if (@deck < $max) |
554
|
6 |
113 |
if (@deck < $min) |
654
|
52 |
8 |
$faro eq 'in' ? : |
717
|
0 |
25 |
if (defined $position and &looks_like_number($position) and abs $position > $self->deck_size) |
774
|
12 |
9 |
if (defined $_[0] and ref $_[0] eq 'Games::Cards::ShuffleTrack') { } |
788
|
2 |
19 |
if (not defined $lower_limit) { } |
|
11 |
8 |
elsif (not defined $upper_limit) { } |
869
|
1 |
2 |
$times > 1 ? : |
940
|
398 |
64 |
&looks_like_number($card) ? : |
946
|
35 |
389 |
wantarray ? : |
953
|
396 |
2 |
if ($card) { } |
954
|
368 |
28 |
if ($card > 0) |
955
|
3 |
393 |
$card > $self->deck_size - 1 ? : |
970
|
59 |
5 |
$position ? : |
991
|
1 |
1 |
if ($position == 1) { } |
1017
|
1 |
1 |
if ($position > $self->deck_size) |
1094
|
1 |
6 |
if (not defined $position) { } |
|
1 |
5 |
elsif ($position > $self->deck_size) { } |
|
2 |
3 |
elsif ($position < 0) { } |
1148
|
2 |
17 |
unless ($self->size) |
1156
|
11 |
6 |
$params->{'_has_places'} ? : |
1160
|
14 |
3 |
if ($params->{'_has_options'}) |
1162
|
13 |
1 |
if (exists $shortcuts->{$param}) |
1169
|
11 |
6 |
if (defined $destination) { } |
1193
|
68 |
7 |
if ($position > 0) |
1228
|
4 |
69 |
if (_is_shortcut($position)) |
1254
|
52 |
5 |
defined $upper_limit ? : |
1280
|
6 |
1 |
if (@_) { } |
1282
|
4 |
3 |
if (exists $expressions->{$param}) { } |
1329
|
2 |
5 |
$has_destination ? : |
1334
|
4 |
3 |
if (defined $lower_limit) { } |
1336
|
2 |
2 |
defined $upper_limit ? : |
1342
|
1 |
2 |
$self->size < 5 ? : |
1350
|
2 |
5 |
$has_destination ? : |
1361
|
2 |
4 |
$limit < 0 ? : |
1375
|
6 |
27 |
if (&looks_like_number($param)) { } |
|
13 |
14 |
elsif (ref $param eq 'Games::Cards::ShuffleTrack') { } |
1407
|
8 |
26 |
unless (defined $position) |
1411
|
11 |
23 |
if (&any(sub {
$_ eq $position;
}
, keys %$cut_limits)) |