Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:
$body="Content-Disposition: inline\n". "Content-Transfer-Encoding: quoted-printable\n". "Content-Type: text/plain\n\n".encode_qp($body);
8: The resulting object is then returned.$email=MIME::Lite->new(Type=>'multipart/signed');<br> $email->attr('content-type.protocol'=>'application/pgp-signature'); $email->attr('content-type.micalg'=>'PGP-SHA512'); $email->attach('Content-Type'=>'text/plain', Encoding=>'quoted-printab +le', Data=>$body); $email->attach(Type=>'application/pgp-signature', Filename=>'signature +.asc', Disposition=>'attachment', Encoding=>'7bit',Data=>$signed); $email->add('To'=>$to); $email->add('From'=>$from); $email->add('From'=>$subject);
MIME-Version: 1.0 Content-Transfer-Encoding: binary Content-Type: multipart/signed; boundary="_----------=_123721441885025 +0"; micalg="PGP-SHA512"; protocol="application/pgp-signature" X-Mailer: MIME::Lite 3.024 (F2.77; T1.27; A2.04; B3.07; Q3.07) Date: Mon, 16 Mar 2009 09:40:18 -0500 To: vvelox@vvelox.net Subject: subject From: v.velox@vvelox.net Message-Id: <0.564867957585143.1237214418.ZConf::Mail@vixen42> This is a multi-part message in MIME format. --_----------=_1237214418850250 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Content-Type: text/plain body --_----------=_1237214418850250 Content-Disposition: attachment; filename="signature.asc" Content-Transfer-Encoding: 7bit Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- Version: GnuPG v2.0.11 (FreeBSD) iEYEABEKAAYFAkm+ZNIACgkQqrJJy0yxYQAu6ACfZLEAAiudAERIQ3seeuXBrhNq 0xUAniGRyHoxEonSGNjtDUJtdTs+1p0R =C1pk -----END PGP SIGNATURE----- --_----------=_1237214418850250--
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: creating PGP emails
by Anonymous Monk on Mar 16, 2009 at 14:49 UTC | |
by Anonymous Monk on Mar 16, 2009 at 22:19 UTC | |
by Anonymous Monk on Mar 16, 2009 at 22:38 UTC |