Scroll to navigation

Sisimai::MIME(3pm) User Contributed Perl Documentation Sisimai::MIME(3pm)

NAME

Sisimai::MIME - MIME Utilities

SYNOPSIS

    use Sisimai::MIME;

    my $e = '=?utf-8?B?55m954yr44Gr44KD44KT44GT?=';
    my $v = Sisimai::MIME->is_mimeencoded(\$e);
    print $v;   # 1

    my $x = Sisimai::MIME->mimedecode([$e]);
    print $x;

DESCRIPTION

Sisimai::MIME is MIME Utilities for "Sisimai".

CLASS METHODS

"is_mimeencoded(Scalar Reference)"

"is_mimeencoded()" returns that the argument is MIME-Encoded string or not.

    my $e = '=?utf-8?B?55m954yr44Gr44KD44KT44GT?=';
    my $v = Sisimai::MIME->is_mimeencoded(\$e);  # 1

"mimedecode(Array-Ref)"

"mimedecode()" is a decoder method for getting the original string from MIME Encoded string in email headers.

    my $r = '=?utf-8?B?55m954yr44Gr44KD44KT44GT?=';
    my $v = Sisimai::MIME->mimedecode([$r]);

"base64d(\String)"

"base64d" is a decoder method for getting the original string from MIME Base564 encoded string.

    my $r = '44Gr44KD44O844KT';
    my $v = Sisimai::MIME->base64d(\$r);

"qprintd(\String)"

"qprintd" is a decoder method for getting the original string from MIME Quoted- printable encoded string.

    my $r = '=4e=65=6b=6f';
    my $v = Sisimai::MIME->qprintd(\$r);

"boundary(String)"

"boundary()" returns a boundary string from the value of Content-Type header.

    my $r = 'Content-Type: multipart/mixed; boundary=Apple-Mail-1-526612466';
    my $v = Sisimai::MIME->boundary($r);
    print $v;   # Apple-Mail-1-526612466

    print Sisimai::MIME->boundary($r, 0); # --Apple-Mail-1-526612466
    print Sisimai::MIME->boundary($r, 1); # --Apple-Mail-1-526612466--

AUTHOR

azumakuniyuki

COPYRIGHT

Copyright (C) 2014-2016,2018 azumakuniyuki, All rights reserved.

LICENSE

This software is distributed under The BSD 2-Clause License.
2018-06-23 perl v5.24.1