Select Code to Download

  sub get_headers {
    my $self = shift;
    my @headers = @_;
...
    my @values = @{$self->{headers}}{@headers};
    return @values;
  }

  return @results if wantarray;
  carp("More than one value in result in scalar context")
    if @results > 1;
  return $results[0];