i am aware of MIME::Parser so i want some flow or hint
Read the documentation, read the examples, read the tests, write code ...
http://search.cpan.org/grep?cpanid=DONEILL&release=MIME-tools-5.427&string=compress&i=1&n=1&C=0
http://search.cpan.org/grep?cpanid=DONEILL&release=MIME-tools-5.427&string=attach&i=1&n=1&C=0
mail compress attach site:perlmonks.org