in reply to Having trouble getting all parts of email message via MIME::Parser

sub getnetpop3
{my($l)=@_;
my(@a,@b,$i,$j,$procname,$s,$t);

[download]
That's really hard to read (aka write-only Perl). And does your function have to be so big? You should probably start with refactoring the whole thing.
  • Comment on Re: Having trouble getting all parts of email message via MIME::Parser
  • Download Code

In Section Seekers of Perl Wisdom