NAME Email::MIME::Creator - Email::MIME constructor for starting anew. SYNOPSIS use Email::MIME::Creator; use IO::All; # multipart message my @parts = ( Email::MIME->create( attributes => { filename => "report.pdf", content_type => "application/pdf", encoding => "quoted-printable", name => "2004-financials.pdf", }, body => io( "2004-financials.pdf" )->all, ), Email::MIME->create( attributes => { content_type => "text/plain", disposition => "attachment", charset => "US-ASCII", }, body => "Hello there!", ), ); my $email = Email::MIME->create( header => [ From => 'casey@geeknest.com' ], parts => [ @parts ], ); # nesting parts $email->parts_set( [ $email->parts, Email::MIME->create( parts => [ @parts ] ), ], ); # standard modifications $email->header_set( 'X-PoweredBy' => 'RT v3.0' ); $email->header_set( To => rcpts() ); $email->header_set( Cc => aux_rcpts() ); $email->header_set( Bcc => sekrit_rcpts() ); # more advanced $_->encoding_set( 'base64' ) for $email->parts; # Quick multipart creation my $quicky = Email::MIME->create( header => [ From => 'my@address', To => 'your@address', ], parts => [ q[This is part one], q[This is part two], q[These could be binary too], ], ); print $email->as_string; *rcpts = *aux_rcpts = *sekrit_rcpts = sub { 'you@example.com' }; DESCRIPTION Methods create my $single = Email::MIME->create( header => [ ... ], attributes => { ... }, body => '...', ); my $multi = Email::MIME->create( header => [ ... ], attributes => { ... }, parts => [ ... ], ); This method creates a new MIME part. The "header" parameter is a lis of headers to include in the message. "attributes" is a hash of MIME attributes to assign to the part, and may override portions of the header set in the "header" parameter. The "parts" parameter is a list reference containing "Email::MIME" objects. Elements of the "parts" list can also be a non-reference string of data. In that case, an "Email::MIME" object will be created for you. Simple checks will determine if the part is binary or not, and all parts created in this fashion are encoded with "base64", just in case. "parts" takes precedence over "body", which will set this part's body if assigned. So, multi part messages shold use the "parts" parameter and single part messages should use "body". Back to "attributes". The hash keys correspond directly to methods or modifying a message from "Email::MIME::Modifier". The allowed keys are: content_type, charset, name, format, boundary, encoding, disposition, and filename. They will be mapped to "$attr\_set" for message modification. SEE ALSO Email::MIME, Email::MIME::Modifier, Email::Simple::Creator, "IO::All" or "File::Slurp" (for file slurping to create parts from strings), perl. AUTHOR Casey West, . COPYRIGHT Copyright (c) 2004 Casey West. All rights reserved. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.