06/12: gnu: Add perl-mailtools.

[Christopher Baines]

cbaines pushed a commit to branch master
in repository guix.

commit d6daca0ee50bfe3be894ea964b689915ecf1cb21
Author: Christopher Baines <address@hidden>
Date:   Mon Aug 28 20:54:18 2017 +0100

    gnu: Add perl-mailtools.
    
    * gnu/packages/perl.scm (perl-mailtools): New variable.
---
 gnu/packages/perl.scm | 45 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 45 insertions(+)

diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm
index 90b9a6f..e2aa33f 100644
--- a/gnu/packages/perl.scm
+++ b/gnu/packages/perl.scm
@@ -4205,6 +4205,51 @@ implementation of these functions only serves as a 
fallback in case the C
 portions of this module couldn't be compiled on this machine.")
     (license (package-license perl))))
 
+(define-public perl-mailtools
+  (package
+    (name "perl-mailtools")
+    (version "2.19")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append
+             "mirror://cpan/authors/id/M/MA/MARKOV/MailTools-"
+             version
+             ".tar.gz"))
+       (sha256
+        (base32
+         "06jykkv8mp484vzkmwd6dkicx029rl3ir5ljzrbap3paxw1dfzn1"))))
+    (build-system perl-build-system)
+    (propagated-inputs
+     `(("perl-timedate" ,perl-timedate)))
+    (home-page
+     "http://search.cpan.org/dist/MailTools";)
+    (synopsis "Bundle of ancient email modules")
+    (description "MailTools contains the following modules:
address@hidden @asis
address@hidden Mail::Address
+Parse email address from a header line.
address@hidden Mail::Cap
+Interpret mailcap files: mappings of file-types to applications as used by
+many command-line email programs.
address@hidden Mail::Field
+Simplifies access to (some) email header fields.  Used by Mail::Header.
address@hidden Mail::Filter
+Process Mail::Internet messages.
address@hidden Mail::Header
+Collection of Mail::Field objects, representing the header of a Mail::Internet
+object.
address@hidden Mail::Internet
+Represents a single email message, with header and body.
address@hidden Mail::Mailer
+Send Mail::Internet emails via direct smtp or local MTA's.
address@hidden Mail::Send
+Build a Mail::Internet object, and then send it out using Mail::Mailer.
address@hidden Mail::Util
+\"Smart functions\" you should not depend on.
address@hidden table")
+    (license perl-license)))
+
 (define-public perl-memoize-expirelru
   (package
     (name "perl-memoize-expirelru")