and from the console, write:use strict; use MIME::Parser; my $parser = new MIME::Parser; $parser->output_under("./"); #directory where to store the components my $entity = $parser->parse(\*STDIN) or die "parse failed\n"; $entity->dump_skeleton;
So in ./ you'll find a directory like "msg-10237 (cut) 2055-0" in which you have the components.$perl abovecode.pl < mail.txt
In reply to Re: MIME Problem with Email
by dree
in thread MIME Problem with Email
by ralphch
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |