A unified interface to mime encoding and decoding
version 1.315
use Email::MIME::Encodings; my $encoded = Email::MIME::Encodings::encode(base64 => $body); my $decoded = Email::MIME::Encodings::decode(base64 => $encoded);
If a third argument is given, it is the encoding to which to fall back. If no valid codec can be found (considering both the first and third arguments) then an exception is raised.
This module simply wraps \*(C`MIME::Base64\*(C' and \*(C`MIME::QuotedPrint\*(C' so that you can throw the contents of a \*(C`Content-Transfer-Encoding\*(C' header at some text and have the right thing happen.
\*(C`MIME::Base64\*(C', \*(C`MIME::QuotedPrint\*(C', \*(C`Email::MIME\*(C'.
Simon Cozens <[email protected]>
Casey West <[email protected]>
Ricardo \s-1SIGNES\s0 <[email protected]>
This software is copyright (c) 2004 by Simon Cozens and Casey West.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.