$self->cards() returns
$VAR1 = [
          bless( {
                   'state' => 'down',
                   'where' => bless( {
                                       'next' => 0,
                                       'num' => 56,
                                       'max' => 52,
                                       'cards' => $VAR1
                                     }, 'Pile' ),
                   'value' => 1,
                   'suit' => 'h'
                 }, 'Card' ),
          ...
          bless( {
                   'state' => 'down',
                   'where' => $VAR1->[0]{'where'},
                   'value' => 'k',
                   'suit' => 'd'
                 }, 'Card' )
        ];

     @{$self->cards()}->[1..$self->num()-1] returns
$VAR1 = bless( {
                 'state' => 'down',
                 'where' => bless( {
                                     'next' => 0,
                                     'num' => 56,
                                     'max' => 52,
                                     'cards' => [
                                                  $VAR1,
                                                  bless( {
                                                           'state' => 'down',
                                                           'where' => $VAR1->{'where'},
                                                           'value' => 8,
                                                           'suit' => 'c'
                                                         }, 'Card' ),
...
                                                  bless( {
                                                           'state' => 'down',
                                                           'where' => $VAR1->{'where'},
                                                           'value' => 'k',
                                                           'suit' => 'd'
                                                         }, 'Card' )
                                                ]
                                   }, 'Pile' ),
                 'value' => 1,
                 'suit' => 'h'
               }, 'Card' );