view release on metacpan or  search on metacpan

lib/Email/MIME/Encodings.pm  view on Meta::CPAN

sub decode { return codec("decode", @_) }
sub encode { return codec("encode", @_) }

1;

#pod =head1 SYNOPSIS
#pod
#pod   use Email::MIME::Encodings;
#pod   my $encoded = Email::MIME::Encodings::encode(base64 => $body);
#pod   my $decoded = Email::MIME::Encodings::decode(base64 => $encoded);
#pod
#pod If a third argument is given, it is the encoding to which to fall back.  If no
#pod valid codec can be found (considering both the first and third arguments) then
#pod an exception is raised.
#pod
#pod =head1 DESCRIPTION
#pod
#pod This module simply wraps C<MIME::Base64> and C<MIME::QuotedPrint>
#pod so that you can throw the contents of a C<Content-Transfer-Encoding>
#pod header at some text and have the right thing happen.

lib/Email/MIME/Encodings.pm  view on Meta::CPAN

Email::MIME::Encodings - A unified interface to MIME encoding and decoding

=head1 VERSION

version 1.317

=head1 SYNOPSIS

  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.

=head1 DESCRIPTION

This module simply wraps C<MIME::Base64> and C<MIME::QuotedPrint>
so that you can throw the contents of a C<Content-Transfer-Encoding>
header at some text and have the right thing happen.