perl IMAP-BodyStructure