Select Code to Download

sub cards {
  my $self = shift;
  if (@_) { $self->{cards} = shift }
  return $self->{cards};
}

# here's some more code if it helps
sub label {
...
  }
  return $self->{cards};
}