rjbs <3 email

Ok, email is a horrible technology with impossible technical specifications, implementations that are broken in seriously incompatible ways, and massive security issues that have led to a 9:1 noise to signal ratio. It stinks and makes me want to kill.

...but who am I kidding? I love email. It presents fun challenges, and along with the web is the internet medium most used by users of all types, each with their own needs.

This talk will review a few new Email:: modules developed in the last year and suitable for anybody who has to do stuff with email. Among these are Email::Sender, Email::MIME::Kit, and Email::ARF.

Transcript

1. rjbs <3 email the 2009 PEP talk!!!
2. the 2009 PEP talk!!!
4. YAPC::NA 2006
5. PEP: Thoughts from Pobox YAPC::NA 2006
6. YAPC::NA 2007
7. How I Learned To Stop Worrying and Love Email YAPC::NA 2007
8. YAPC::NA 2008
9. Email YAPC::NA 2008 hates the living!
10. What’s the best way to deal with horrible code?
11. Write more code!
12. rjbs <3 email the 2009 PEP talk!!!
13. sending email
14. MIME::Lite Mail::Send Mail::Sender Mail::Sendmail
15. Mail::Mailer
16. Email::Send
18. system(“sendmail @opts < $tempfile”) && die sprintf “sendmail died: %s”, errstr($?);
19. Mail::Transport
21. Email::Sender
22. Email::Sender
23. Email::Sender Email-Sender uses Møøse
24. Email::Sender Email-Sender uses Møøse Email::Sender is a role
25. Email::Sender Email-Sender uses Møøse Email::Sender is a role you use Email::Sender::Simple
26. Email::Sender::Simple use Email::Sender::Simple qw(sendmail); my $email = $customer->build_welcome_email; sendmail($email);
27. use Email::Sender::Simple qw(sendmail); my $email = $customer->build_welcome_email; sendmail( $email, { to => \@rcpts, from => $sender, } ); Email::Sender::Simple
28. Email::Sender::Simple my $smtp = Email::Sender::Transport::SMTP->new({ host => ‘sasl.pobox.com’, port => 26, }); sendmail($email, { transport => $smtp });
29. Transports
30. Transports Sendmail
31. Transports Sendmail SMTP
32. Transports Sendmail SMTP Persist. SMTP
33. Transports Sendmail SMTP Persist. SMTP Maildir, Mbox
34. Transports Sendmail SMTP Persist. SMTP Maildir, Mbox DevNull
35. Transports Sendmail SMTP Persist. SMTP Maildir, Mbox DevNull Print
36. Transports Sendmail SMTP Persist. SMTP Maildir, Mbox DevNull Print Test
37. Transports Sendmail SMTP Persist. SMTP Maildir, Mbox DevNull Print Test SQLite
38. Email::Sender::Simple my $smtp = Email::Sender::Transport::SMTP->new({ host => ‘sasl.pobox.com’, port => 26, }); sendmail($email, { transport => $smtp });
39. Email::Sender::Simple walrus!rjbs:~$ EMAIL_SENDER_TRANSPORT=Maildir my-awesome-program --auden
40. Programmable Failure
41. Programmable Failure ::Failable transport
42. Programmable Failure ::Failable transport wrap any transport
43. Programmable Failure ::Failable transport wrap any transport make it fail when you want
44. Other Random Senderisms
45. Other Random Senderisms structured failure
46. Other Random Senderisms structured failure partial successes
47. making email messages
48. Email::Simple
49. Email::MIME
50. these are pretty low level
51. you probably want to send only a few messages (but with differences)
52. MIME Crap to Deal With
53. MIME Crap to Deal With header encoding
54. MIME Crap to Deal With header encoding content encoding
55. MIME Crap to Deal With header encoding content encoding building html & plain parts
56. MIME Crap to Deal With header encoding content encoding building html & plain parts attaching files
57. Other Crap to Deal With
58. Other Crap to Deal With templated documents
59. Other Crap to Deal With templated documents validate parameters
60. Other Crap to Deal With templated documents validate parameters reusable hunks of content
62. hate!
63. Existing Solutions
64. Existing Solutions none?
65. Existing Solutions none? horrible hacks
66. Existing Solutions none? horrible hacks make a template in TT
67. Existing Solutions none? horrible hacks make a template in TT render to html
68. Existing Solutions none? horrible hacks make a template in TT render to html html-to-text
69. Existing Solutions none? horrible hacks make a template in TT render to html html-to-text hope you guess right at headers
71. Email::MIME::Kit
72. Email::MIME::Kit
73. Email::MIME::Kit a bunch of files
74. Email::MIME::Kit a bunch of files with instructions on how to assemble them
75. Email::MIME::Kit a bunch of files with instructions on how to assemble them and some other data
76. Kit Manifest { "renderer" : "TT", "header" : [ { "Subject": "Hello [% user.name %]" }, { "From": "Test Sender <test@test.com>" }, { "To": "[% user.email %]" } ], "alternatives": [ { "type": "text/plain", "path": "body.txt" }, { "type": "text/html", "path": "body.html" } ], "attachments": [ { "path": "demands.rtf" } ] }
77. Assembling the Kit my $kit = Email::MIME::Kit->new({ source => ‘msg.mkit’ }); my $email = $kit->assemble({ user => $user_object }); sendmail($email);
78. Dear , Thank you for being a customer since . Your account has been due to . Please contact before at or we will be forced to your lovely wife Tracy’s head. Cheers, Anonymous
79. Kit Manifest { "renderer" : "TT", “validator”: “Rx”, "header" : [ { "Subject": "Hello [% user.name %]" }, { "From": "Test Sender <test@test.com>" }, { "To": "[% user.email %]" } ], "alternatives": [ { "type": "text/plain", "path": "body.txt" }, { "type": "text/html", "path": "body.html" } ], "attachments": [ { "path": "demands.rtf" } ] }
80. rx.json { “type”: “//rec”, “required”: { “user”: { “type”: “/perl/obj”, “isa” : “User::Account” } } }
81. Assembling the Kit my $kit = Email::MIME::Kit->new({ source => ‘msg.mkit’ }); my $email = $kit->assemble({ user => undef }); undefined value tag: [ “/err/nil” ], data path: [ “user” ], schema path: [ “user” ] at slide 42, line 3
82. Annoying Crap: Dealt With
83. Annoying Crap: Dealt With if user.name is Ævar...
84. Annoying Crap: Dealt With if user.name is Ævar... if attachments are binary...
85. Annoying Crap: Dealt With if user.name is Ævar... if attachments are binary... text-only (singlepart) mail...
86. Annoying Crap: Dealt With if user.name is Ævar... if attachments are binary... text-only (singlepart) mail... HTML with images as attachments...
87. ...so what’s still annoying?
88. Some Kits...
89. Some Kits... ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json
90. Some Kits... ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json
91. Some Kits... ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json
92. Some Kits... ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json
93. Some Kits... ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json ./body.html ./body.txt ./logo.jpg ./background.jpg ./manifest.json
94. The Kit Reader
95. The Kit Reader EMKit gets at its contents with the kit reader
96. The Kit Reader EMKit gets at its contents with the kit reader normally, just looks for files in the kit directory
97. SWAK!
98. SWAK! you can write your own kit reader
99. SWAK! you can write your own kit reader SWAK: Path::Resolver
100. SWAK! you can write your own kit reader SWAK: Path::Resolver /kit/body.html
101. SWAK! you can write your own kit reader SWAK: Path::Resolver /kit/body.html body.html
102. SWAK! you can write your own kit reader SWAK: Path::Resolver /kit/body.html body.html /fs/usr/share/app/body.html
103. SWAK in Use ./body.html ./body.txt ./manifest.json ./body.html ./body.txt ./manifest.json ./body.html ./body.txt ./manifest.json
104. SWAK in Use ./body.html ./body.txt ./manifest.json ./body.html ./body.txt ./manifest.json ./body.html ./body.txt ./manifest.json /dist/YourApp/logo.jpg /dist/YourApp/background.jpg
105. SWAK in Use ./body.html ./body.txt ./manifest.json ./body.html ./body.txt ./manifest.json ./body.html ./body.txt ./manifest.json /dist/YourApp/logo.jpg /dist/YourApp/background.jpg
106. EMK::Assembler::Markdown ./body.mkdn ./manifest.json ./body.mkdn ./manifest.json ./body.mkdn ./manifest.json /dist/YourApp/logo.jpg /dist/YourApp/background.jpg
107. ./body.mkdn ./manifest.json ./body.mkdn ./manifest.json ./body.mkdn ./manifest.json /dist/YourApp/logo.jpg /dist/YourApp/background.jpg /dist/YourApp/wrapper.html /dist/YourApp/wrapper.text EMK::Assembler::Markdown
108. Thank you!