Select Code to Download

my $mail = Email::Simple->new($msg);
my (%headers_i_care_about);
...
  # my $headers_i_care_about{$i_care_about} = 
  #     join(' ', $mail->header($i_care_about));
}

my (%headers);
my ($lastheader);
...
    $lastheader = $parts[0];
  }
}