for my $folder($imap->messages()){
   my $hashref = $imap->parse_headers($folder,"From");
   my @from_addresses = Mail::Address->parse($hashref->{From}->[0]);
   my $address = $from_addresses[0]->address();
   push(@mail_addresses,$address);
 }
 return \@mail_addresses;