Select Code to Download

#!/usr/bin/perl

...
$parser->output_under("./processed");
my $entity = $parser->parse_open("./1b8b5dfc-a31e-44be-bd99-d9b2782a21
+78");
$entity->dump_skeleton;

Content-type: multipart/alternative
Effective-type: multipart/alternative
...
    Body-file: processed/msg-1362411528-18768-0/msg-18768-2.html
    --

Return-Path: <arnone385831@tom.com>
Received: from tom.com (cnsmtpr5.tom.com [218.30.111.155])
...
LT48YnI+PGJyPjwhLS0gZm9vdGVyIC0tPjxicj4NCg0K
--Boundary-=_uJqgnzBUwHgpxQBYwHbjmGHjYeJw--