Skip to content

retupmoca/p6-Email-MIME

Folders and files

NameName
Last commit message
Last commit date

Latest commit

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Repository files navigation

Email::MIME

This is a port of perl 5's Email::MIME.

Example Usage

use Email::MIME;

my $eml = Email::MIME.new($raw-mail-text);
say $eml.body-str;

my $new = Email::MIME.create(header-str => ['from' => '[email protected]',
                                            'subject' => 'This is a»test.'],
                             attributes => {'content-type' => 'text/plain',
                                            'charset' => 'utf-8',
                                            'encoding' => 'quoted-printable'},
                             body-str => 'Hello«World');
say ~$new;

Faster Base64 Encoding

To benefit from faster Base64 encoding and decoding install the Base64::Native module which will be auto-detected and used automatically.

Methods

  • new(Str $text)

    To work around the current limitation of new() requiring a well formed unicode Str, you will need to set the correct decoding on Slurp.

    my $msg = Email::MIME.new($file.IO.slurp: enc => 'utf8-c8');
    
  • create(:$header, :$header-str, :$attributes, :$parts, :$body, :$body-str)

  • filename($force = False)

  • invent-filename($ct?)

  • filename-set($filename)

  • boundary-set($string)

  • content-type()

  • content-type-set($ct)

  • charset-set($charset)

  • name-set($name)

  • format-set($format)

  • disposition-set($disposition)

  • encoding-set($enc)

  • parts()

    Returns the subparts of the current message. If there are no subparts, will return the current message.

  • subparts()

    Returns the subparts of the current message. If there are no subparts, will return an empty list.

  • walk-parts($callback)

    Visits each MIME part once, calling $callback($part) on each.

  • debug-structure()

    Prints out the part structure of the email.

  • parts-set(@parts)

    Sets the passed Email::MIME objects as the parts of the email.

  • parts-add(@parts)

    Adds the passed Email::MIME objects to the list of parts in the email.

  • body-str( --> Str)

    Returns the mail body, decoded according to the charset and transfer encoding headers.

  • body-str-set(Str $body)

    Sets the mail body to $body, encoding it using the charset and transfer encoding configured.

  • body( --> Buf)

    Returns the mail body as a binary blob, after decoding it from the transfer encoding.

  • body-set(Blob $data)

    Sets the mail body to $data. Will encode $data using the configured transfer encoding.

  • body-raw()

    Returns the raw body of the email (What will appear when .Str is called)

  • body-raw-set($body)

    Sets the raw body of the email (What will appear when .Str is called)

  • header-str-pairs()

    Returns the full header data for an email.

  • header-str($name, :$multi)

    Returns the email header with the name $name. If :$multi is not passed, then this will return the first header found. If :$multi is set, then this will return a list of all headers with the name $name (note the change from v1.0!)

  • header-str-set($name, *@lines)

    Sets the header $name. Adds one $name header for each additional argument passed.

  • header-names()

    Returns a list of header names in the email.

  • headers()

    Alias of header-names()

  • header($name)

    Returns a list of email headers with the name $name. If used in string context, will act like the first value of the list. (So you can call say $eml.header('Subject') and it will work correctly). Note that this will not decode any encoded headers.

  • header-set($name, *@lines)

    Sets the header $name. Adds one $name header for each additional argument passed. This will not encode any headers, even if they have non-ascii characters.

  • header-pairs()

    Returns the full header data for an email. Note that this will not decode any encoded headers.

    $eml.header-pairs(); # --> [['Subject', 'test'], ['From', '[email protected]']]
    
  • as-string(), Str()

    Returns the full raw email, suitable for piping into sendmail.

  • crlf()

  • header-obj()

  • header-obj-set($obj)

License

All files in this repository are licensed under the terms of the Creative Commons CC0 License; for details, please see the LICENSE file