sub get_rec {
  my $self=shift;
  print(join ",",@$self),return unless defined wantarray;
  return wantarray ? @$self : join(",",@$self);
}