gnu: Group and alphabetize perl module packages.

* gnu/packages/web.scm (perl-encode-locale, perl-file-listing,
  perl-html-parser, perl-html-tagset, perl-http-cookies, perl-http-daemon,
  perl-http-date, perl-http-message, perl-http-negotiate, perl-io-html,
  perl-io-socket-ssl, perl-libwww, perl-lwp-mediatypes, perl-net-http,
  perl-uri, perl-www-curl, perl-www-robotrules): Group and alphabetize.

1 files changed, 356 insertions, 354 deletions

diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm
index c977a1ee7d..07fcc21c31 100644
--- a/gnu/packages/web.scm
+++ b/gnu/packages/web.scm
@@ -5,6 +5,7 @@
 ;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org>
 ;;; Copyright © 2015 Ricardo Wurmus <rekado@elephly.net>
 ;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
+;;; Copyright © 2015 Eric Bavier <bavier@member.fsf.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -325,158 +326,267 @@ used to validate and fix HTML data.")
     (home-page "http://tidy.sourceforge.net/")
     (license (l:x11-style "file:///include/tidy.h"))))
 
-(define-public perl-html-tagset
+(define-public tinyproxy
   (package
-    (name "perl-html-tagset")
-    (version "3.20")
+    (name "tinyproxy")
+    (version "1.8.3")
     (source (origin
-             (method url-fetch)
-             (uri (string-append
-                   "mirror://cpan/authors/id/P/PE/PETDANCE/HTML-Tagset-"
-                   version ".tar.gz"))
-             (sha256
-              (base32
-               "1qh8249wgr4v9vgghq77zh1d2zs176bir223a8gh3k9nksn7vcdd"))))
-    (build-system perl-build-system)
-    (license (package-license perl))
-    (synopsis "Perl data tables useful in parsing HTML")
-    (description
-     "The HTML::Tagset module contains several data tables useful in various
-kinds of HTML parsing operations.")
-    (home-page "http://search.cpan.org/dist/HTML-Tagset/")))
+              (method url-fetch)
+              (uri (string-append
+                    "http://www.samba.org/~obnox/" name "/download/"
+                    name "-" version ".tar.bz2"))
+              (sha256
+               (base32
+                "0vl9igw7vm924rs6d6bkib7zfclxnlf9s8rmml1sfwj7xda9nmdy"))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:configure-flags
+       (list
+        ;; For the log file, etc.
+        "--localstatedir=/var")
+       #:phases
+       (alist-cons-before
+        'build 'pre-build
+        (lambda* (#:key inputs #:allow-other-keys #:rest args)
+          ;; Uncommenting the next two lines may assist in debugging
+          ;; (substitute* "docs/man5/Makefile" (("a2x") "a2x -v"))
+          ;; (setenv "XML_DEBUG_CATALOG" "1")
+          #t)
+        %standard-phases)))
+    ;; All of the below are used to generate the documentation
+    ;; (Should they be propagated inputs of asciidoc ??)
+    (native-inputs `(("asciidoc" ,asciidoc)
+                     ("libxml2" ,libxml2) 
+                     ("docbook-xml" ,docbook-xml)
+                     ("docbook-xsl" ,docbook-xsl)
+                     ("libxslt" ,libxslt)))
+    (home-page "https://banu.com/tinyproxy/")
+    (synopsis "Light-weight HTTP/HTTPS proxy daemon")
+    (description "Tinyproxy is a light-weight HTTP/HTTPS proxy
+daemon.  Designed from the ground up to be fast and yet small, it is an ideal
+solution for use cases such as embedded deployments where a full featured HTTP
+proxy is required, but the system resources for a larger proxy are
+unavailable.")
+    (license l:gpl2+)))
 
-(define-public perl-html-parser
+(define-public polipo
   (package
-    (name "perl-html-parser")
-    (version "3.71")
-    (source (origin
-             (method url-fetch)
-             (uri (string-append
-                   "mirror://cpan/authors/id/G/GA/GAAS/HTML-Parser-"
-                   version ".tar.gz"))
-             (sha256
-              (base32
-               "00nqzdgl7c3jilx7mil19k5jwcw3as14pvkjgxi97zyk94vqp4dy"))))
-    (build-system perl-build-system)
-    (inputs
-     `(("perl-html-tagset" ,perl-html-tagset)))
-    (license (package-license perl))
-    (synopsis "Perl HTML parser class")
+    (name "polipo")
+    (version "1.1.1")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append
+             "http://www.pps.univ-paris-diderot.fr/~jch/software/files/polipo/polipo-"
+             version ".tar.gz"))
+       (sha256
+        (base32
+         "05g09sg9qkkhnc2mxldm1w1xkxzs2ylybkjzs28w8ydbjc3pand2"))))
+    (native-inputs `(("texinfo" ,texinfo)))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:phases
+       (alist-delete 'configure %standard-phases)
+       #:make-flags (let ((out (assoc-ref %outputs "out")))
+                      (list (string-append "PREFIX=" out)
+                            (string-append "LOCAL_ROOT="
+                                           out "/share/polipo/www")
+                            "CC=gcc"))
+       ;; No 'check' target.
+       #:tests? #f))
+    (home-page "http://www.pps.univ-paris-diderot.fr/~jch/software/polipo/")
+    (synopsis "Small caching web proxy")
     (description
-     "Objects of the HTML::Parser class will recognize markup and separate
-it from plain text (alias data content) in HTML documents.  As different
-kinds of markup and text are recognized, the corresponding event handlers
-are invoked.")
-    (home-page "http://search.cpan.org/~gaas/HTML-Parser/")))
+     "Polipo is a small caching web proxy (web cache, HTTP proxy, and proxy
+server).  It was primarily designed to be used by one person or a small group
+of people.")
+    (license l:expat)))
 
-(define-public perl-http-date
+(define-public libyaml
   (package
-    (name "perl-http-date")
-    (version "6.02")
-    (source (origin
-             (method url-fetch)
-             (uri (string-append
-                   "mirror://cpan/authors/id/G/GA/GAAS/HTTP-Date-"
-                   version ".tar.gz"))
-             (sha256
-              (base32
-               "0cz357kafhhzw7w59iyi0wvhw7rlh5g1lh38230ckw7rl0fr9fg8"))))
-    (build-system perl-build-system)
-    (license (package-license perl))
-    (synopsis "Perl date conversion routines")
+    (name "libyaml")
+    (version "0.1.5")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append
+             "http://pyyaml.org/download/libyaml/yaml-"
+             version ".tar.gz"))
+       (sha256
+        (base32
+         "1vrv5ly58bkmcyc049ad180f2m8iav6l9h3v8l2fqdmrny7yx1zs"))))
+    (build-system gnu-build-system)
+    (home-page "http://pyyaml.org/wiki/LibYAML")
+    (synopsis "YAML 1.1 parser and emitter written in C")
     (description
-     "The HTTP::Date module provides functions that deal with date formats
-used by the HTTP protocol (and then some more).")
-    (home-page "http://search.cpan.org/~gaas/HTTP-Date/")))
+     "LibYAML is a YAML 1.1 parser and emitter written in C.")
+    (license l:expat)))
 
-(define-public perl-uri
+(define-public libquvi-scripts
   (package
-    (name "perl-uri")
-    (version "1.60")
+    (name "libquvi-scripts")
+    (version "0.4.21")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append
+             "mirror://sourceforge/quvi/libquvi-scripts-" version ".tar.xz"))
+       (sha256
+        (base32 "0d0giry6bb57pnidymvdl7i5x9bq3ljk3g4bs294hcr5mj3cq0kw"))))
+    (build-system gnu-build-system)
+    (home-page "http://quvi.sourceforge.net/")
+    (synopsis "Media stream URL parser")
+    (description "This package contains support scripts called by libquvi to
+parse media stream properties.")
+    (license l:lgpl2.1+)))
+
+(define-public libquvi
+  (package
+    (name "libquvi")
+    (version "0.4.1")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append
+             "mirror://sourceforge/quvi/libquvi-" version ".tar.xz"))
+       (sha256
+        (base32 "00x9gbmzc5cns0gnfag0hsphcr3cb33vbbb9s7ppvvd6bxz2z1mm"))))
+    (build-system gnu-build-system)
+    (native-inputs `(("pkg-config" ,pkg-config)))
+    (inputs
+     `(("curl" ,curl)
+       ("cyrus-sasl" ,cyrus-sasl)
+       ("libquvi-scripts" ,libquvi-scripts)
+       ("lua" ,lua-5.1)
+       ("openssl" ,openssl)
+       ("zlib" ,zlib)))
+    (arguments
+     ;; Lua provides no .pc file, so add CFLAGS/LIBS manually.
+     '(#:configure-flags
+       (let ((lua (assoc-ref %build-inputs "lua")))
+         (list
+          (string-append "liblua_CFLAGS=-I" lua "/include")
+          (string-append "liblua_LIBS=-L" lua "/libs -llua")))))
+    (home-page "http://quvi.sourceforge.net/")
+    (synopsis "Media stream URL parser")
+    (description "libquvi is a library with a C API for parsing media stream
+URLs and extracting their actual media files.")
+    (license l:lgpl2.1+)))
+
+(define-public quvi
+  (package
+    (name "quvi")
+    (version "0.4.2")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append
+             "mirror://sourceforge/quvi/quvi-" version ".tar.xz"))
+       (sha256
+        (base32 "09lhl6dv5zpryasx7yjslfrcdcqlsbwapvd5lg7w6sm5x5n3k8ci"))))
+    (build-system gnu-build-system)
+    (native-inputs `(("pkg-config" ,pkg-config)))
+    (inputs
+     `(("curl" ,curl)
+       ("libquvi" ,libquvi)))
+    (home-page "http://quvi.sourceforge.net/")
+    (synopsis "Media stream URL parser")
+    (description "quvi is a command-line-tool suite to extract media files
+from streaming URLs.  It is a command-line wrapper for the libquvi library.")
+    (license l:lgpl2.1+)))
+
+
+(define-public perl-encode-locale
+  (package
+    (name "perl-encode-locale")
+    (version "1.03")
     (source (origin
              (method url-fetch)
              (uri (string-append
-                   "mirror://cpan/authors/id/G/GA/GAAS/URI-"
+                   "mirror://cpan/authors/id/G/GA/GAAS/Encode-Locale-"
                    version ".tar.gz"))
              (sha256
               (base32
-               "0xr31mf7lfrwhyvlx4pzp6p7alls5gi4bj8pk5g89f5cckfd74hz"))))
+               "0m9d1vdphlyzybgmdanipwd9ndfvyjgk3hzw250r299jjgh3fqzp"))))
     (build-system perl-build-system)
     (license (package-license perl))
-    (synopsis "Perl Uniform Resource Identifiers (absolute and relative)")
+    (synopsis "Perl locale encoding determination")
     (description
-     "The URI module implements the URI class.  Objects of this class
-represent \"Uniform Resource Identifier references\" as specified in RFC 2396
-(and updated by RFC 2732).")
-    (home-page "http://search.cpan.org/~gaas/URI/")))
+     "The POSIX locale system is used to specify both the language
+conventions requested by the user and the preferred character set to consume
+and output.  The Encode::Locale module looks up the charset and encoding
+(called a CODESET in the locale jargon) and arranges for the Encode module
+to know this encoding under the name \"locale\".  It means bytes obtained
+from the environment can be converted to Unicode strings by calling
+Encode::encode(locale => $bytes) and converted back again with
+Encode::decode(locale => $string).")
+    (home-page "http://search.cpan.org/~gaas/Encode-Locale/")))
 
-(define-public perl-lwp-mediatypes
+(define-public perl-file-listing
   (package
-    (name "perl-lwp-mediatypes")
-    (version "6.02")
+    (name "perl-file-listing")
+    (version "6.04")
     (source (origin
              (method url-fetch)
              (uri (string-append
-                   "mirror://cpan/authors/id/G/GA/GAAS/LWP-MediaTypes-"
+                   "mirror://cpan/authors/id/G/GA/GAAS/File-Listing-"
                    version ".tar.gz"))
              (sha256
               (base32
-               "0xmnblp962qy02akah30sji8bxrqcyqlff2w95l199ghql60ny8q"))))
+               "1xcwjlnxaiwwpn41a5yi6nz95ywh3szq5chdxiwj36kqsvy5000y"))))
     (build-system perl-build-system)
+    (propagated-inputs
+     `(("perl-http-date" ,perl-http-date)))
     (license (package-license perl))
-    (synopsis "Perl module to guess the media type for a file or a URL")
+    (synopsis "Perl directory listing parser")
     (description
-     "The LWP::MediaTypes module provides functions for handling media (also
-known as MIME) types and encodings.  The mapping from file extensions to
-media types is defined by the media.types file.  If the ~/.media.types file
-exists it is used instead.")
-    (home-page "http://search.cpan.org/~gaas/LWP-MediaTypes/")))
+     "The File::Listing module exports a single function called parse_dir(),
+which can be used to parse directory listings.")
+    (home-page "http://search.cpan.org/~gaas/File-Listing/")))
 
-(define-public perl-io-html
+(define-public perl-html-parser
   (package
-    (name "perl-io-html")
-    (version "1.00")
+    (name "perl-html-parser")
+    (version "3.71")
     (source (origin
              (method url-fetch)
              (uri (string-append
-                   "mirror://cpan/authors/id/C/CJ/CJM/IO-HTML-"
+                   "mirror://cpan/authors/id/G/GA/GAAS/HTML-Parser-"
                    version ".tar.gz"))
              (sha256
               (base32
-               "06nj3a0xgp5jxwxx6ayglfk2v7npf5a7gwkqsjlkapjkybarzqh4"))))
+               "00nqzdgl7c3jilx7mil19k5jwcw3as14pvkjgxi97zyk94vqp4dy"))))
     (build-system perl-build-system)
+    (inputs
+     `(("perl-html-tagset" ,perl-html-tagset)))
     (license (package-license perl))
-    (synopsis "Perl module to open an HTML file with automatic charset detection")
+    (synopsis "Perl HTML parser class")
     (description
-     "IO::HTML provides an easy way to open a file containing HTML while
-automatically determining its encoding.  It uses the HTML5 encoding sniffing
-algorithm specified in section 8.2.2.1 of the draft standard.")
-    (home-page "http://search.cpan.org/~cjm/IO-HTML/")))
+     "Objects of the HTML::Parser class will recognize markup and separate
+it from plain text (alias data content) in HTML documents.  As different
+kinds of markup and text are recognized, the corresponding event handlers
+are invoked.")
+    (home-page "http://search.cpan.org/~gaas/HTML-Parser/")))
 
-(define-public perl-http-message
+(define-public perl-html-tagset
   (package
-    (name "perl-http-message")
-    (version "6.06")
+    (name "perl-html-tagset")
+    (version "3.20")
     (source (origin
              (method url-fetch)
              (uri (string-append
-                   "mirror://cpan/authors/id/G/GA/GAAS/HTTP-Message-"
+                   "mirror://cpan/authors/id/P/PE/PETDANCE/HTML-Tagset-"
                    version ".tar.gz"))
              (sha256
               (base32
-               "0qxdrcak97azjvqyx1anpb2ky6vp6vc37x0wcfjdqfajkh09fzh8"))))
+               "1qh8249wgr4v9vgghq77zh1d2zs176bir223a8gh3k9nksn7vcdd"))))
     (build-system perl-build-system)
-    (propagated-inputs
-     `(("perl-http-date" ,perl-http-date)
-       ("perl-uri" ,perl-uri)))
-    (inputs
-     `(("perl-io-html" ,perl-io-html)
-       ("perl-lwp-mediatypes" ,perl-lwp-mediatypes)))
     (license (package-license perl))
-    (synopsis "Perl HTTP style message")
+    (synopsis "Perl data tables useful in parsing HTML")
     (description
-     "An HTTP::Message object contains some headers and a content body.")
-    (home-page "http://search.cpan.org/~gaas/HTTP-Message/")))
+     "The HTML::Tagset module contains several data tables useful in various
+kinds of HTML parsing operations.")
+    (home-page "http://search.cpan.org/dist/HTML-Tagset/")))
 
 (define-public perl-http-cookies
   (package
@@ -525,126 +635,120 @@ on a socket for incoming requests.  The HTTP::Daemon is a subclass of
 IO::Socket::INET, so you can perform socket operations directly on it too.")
     (home-page "http://search.cpan.org/~gaas/HTTP-Daemon/")))
 
-(define-public perl-http-negotiate
+(define-public perl-http-date
   (package
-    (name "perl-http-negotiate")
-    (version "6.01")
+    (name "perl-http-date")
+    (version "6.02")
     (source (origin
              (method url-fetch)
              (uri (string-append
-                   "mirror://cpan/authors/id/G/GA/GAAS/HTTP-Negotiate-"
+                   "mirror://cpan/authors/id/G/GA/GAAS/HTTP-Date-"
                    version ".tar.gz"))
              (sha256
               (base32
-               "05p053vjs5g91v5cmjnny7a3xzddz5k7vnjw81wfh01ilqg9qwhw"))))
+               "0cz357kafhhzw7w59iyi0wvhw7rlh5g1lh38230ckw7rl0fr9fg8"))))
     (build-system perl-build-system)
-    (propagated-inputs
-     `(("perl-http-message" ,perl-http-message)))
     (license (package-license perl))
-    (synopsis "Perl http content negotiation")
+    (synopsis "Perl date conversion routines")
     (description
-     "The HTTP::Negotiate module provides a complete implementation of the
-HTTP content negotiation algorithm specified in
-draft-ietf-http-v11-spec-00.ps chapter 12.  Content negotiation allows for
-the selection of a preferred content representation based upon attributes
-of the negotiable variants and the value of the various Accept* header
-fields in the request.")
-    (home-page "http://search.cpan.org/~gaas/HTTP-Negotiate/")))
+     "The HTTP::Date module provides functions that deal with date formats
+used by the HTTP protocol (and then some more).")
+    (home-page "http://search.cpan.org/~gaas/HTTP-Date/")))
 
-(define-public perl-www-robotrules
+(define-public perl-http-message
   (package
-    (name "perl-www-robotrules")
-    (version "6.02")
+    (name "perl-http-message")
+    (version "6.06")
     (source (origin
              (method url-fetch)
              (uri (string-append
-                   "mirror://cpan/authors/id/G/GA/GAAS/WWW-RobotRules-"
+                   "mirror://cpan/authors/id/G/GA/GAAS/HTTP-Message-"
                    version ".tar.gz"))
              (sha256
               (base32
-               "07m50dp5n5jxv3m93i55qvnd67a6g7cvbvlik115kmc8lbkh5da6"))))
+               "0qxdrcak97azjvqyx1anpb2ky6vp6vc37x0wcfjdqfajkh09fzh8"))))
     (build-system perl-build-system)
     (propagated-inputs
-     `(("perl-uri" ,perl-uri)))
+     `(("perl-http-date" ,perl-http-date)
+       ("perl-uri" ,perl-uri)))
+    (inputs
+     `(("perl-io-html" ,perl-io-html)
+       ("perl-lwp-mediatypes" ,perl-lwp-mediatypes)))
     (license (package-license perl))
-    (synopsis "Perl database of robots.txt-derived permissions")
+    (synopsis "Perl HTTP style message")
     (description
-     "The WWW::RobotRules module parses /robots.txt files as specified in
-\"A Standard for Robot Exclusion\", at
-<http://www.robotstxt.org/wc/norobots.html>.  Webmasters can use the
-/robots.txt file to forbid conforming robots from accessing parts of
-their web site.")
-    (home-page "http://search.cpan.org/~gaas/WWW-RobotRules/")))
+     "An HTTP::Message object contains some headers and a content body.")
+    (home-page "http://search.cpan.org/~gaas/HTTP-Message/")))
 
-(define-public perl-net-http
+(define-public perl-http-negotiate
   (package
-    (name "perl-net-http")
-    (version "6.06")
+    (name "perl-http-negotiate")
+    (version "6.01")
     (source (origin
              (method url-fetch)
              (uri (string-append
-                   "mirror://cpan/authors/id/G/GA/GAAS/Net-HTTP-"
+                   "mirror://cpan/authors/id/G/GA/GAAS/HTTP-Negotiate-"
                    version ".tar.gz"))
              (sha256
               (base32
-               "1m1rvniffadq99gsy25298ia3lixwymr6kan64jd3ylyi7nkqkhx"))))
+               "05p053vjs5g91v5cmjnny7a3xzddz5k7vnjw81wfh01ilqg9qwhw"))))
     (build-system perl-build-system)
+    (propagated-inputs
+     `(("perl-http-message" ,perl-http-message)))
     (license (package-license perl))
-    (synopsis "Perl low-level HTTP connection (client)")
+    (synopsis "Perl http content negotiation")
     (description
-     "The Net::HTTP class is a low-level HTTP client.  An instance of the
-Net::HTTP class represents a connection to an HTTP server.  The HTTP protocol
-is described in RFC 2616.  The Net::HTTP class supports HTTP/1.0 and
-HTTP/1.1.")
-    (home-page "http://search.cpan.org/~gaas/Net-HTTP/")))
+     "The HTTP::Negotiate module provides a complete implementation of the
+HTTP content negotiation algorithm specified in
+draft-ietf-http-v11-spec-00.ps chapter 12.  Content negotiation allows for
+the selection of a preferred content representation based upon attributes
+of the negotiable variants and the value of the various Accept* header
+fields in the request.")
+    (home-page "http://search.cpan.org/~gaas/HTTP-Negotiate/")))
 
-(define-public perl-file-listing
+(define-public perl-io-html
   (package
-    (name "perl-file-listing")
-    (version "6.04")
+    (name "perl-io-html")
+    (version "1.00")
     (source (origin
              (method url-fetch)
              (uri (string-append
-                   "mirror://cpan/authors/id/G/GA/GAAS/File-Listing-"
+                   "mirror://cpan/authors/id/C/CJ/CJM/IO-HTML-"
                    version ".tar.gz"))
              (sha256
               (base32
-               "1xcwjlnxaiwwpn41a5yi6nz95ywh3szq5chdxiwj36kqsvy5000y"))))
+               "06nj3a0xgp5jxwxx6ayglfk2v7npf5a7gwkqsjlkapjkybarzqh4"))))
     (build-system perl-build-system)
-    (propagated-inputs
-     `(("perl-http-date" ,perl-http-date)))
     (license (package-license perl))
-    (synopsis "Perl directory listing parser")
+    (synopsis "Perl module to open an HTML file with automatic charset detection")
     (description
-     "The File::Listing module exports a single function called parse_dir(),
-which can be used to parse directory listings.")
-    (home-page "http://search.cpan.org/~gaas/File-Listing/")))
+     "IO::HTML provides an easy way to open a file containing HTML while
+automatically determining its encoding.  It uses the HTML5 encoding sniffing
+algorithm specified in section 8.2.2.1 of the draft standard.")
+    (home-page "http://search.cpan.org/~cjm/IO-HTML/")))
 
-(define-public perl-encode-locale
+(define-public perl-io-socket-ssl
   (package
-    (name "perl-encode-locale")
-    (version "1.03")
+    (name "perl-io-socket-ssl")
+    (version "2.002")
     (source (origin
-             (method url-fetch)
-             (uri (string-append
-                   "mirror://cpan/authors/id/G/GA/GAAS/Encode-Locale-"
-                   version ".tar.gz"))
-             (sha256
-              (base32
-               "0m9d1vdphlyzybgmdanipwd9ndfvyjgk3hzw250r299jjgh3fqzp"))))
+              (method url-fetch)
+              (uri (string-append "mirror://cpan/authors/id/S/SU/SULLR/"
+                                  "IO-Socket-SSL-" version ".tar.gz"))
+              (sha256
+               (base32
+                "1mph52lw6x5v44wf8mw00llzi8pp6k5c4jnrnrvlacrlfv260jb8"))))
     (build-system perl-build-system)
-    (license (package-license perl))
-    (synopsis "Perl locale encoding determination")
+    (propagated-inputs `(("perl-net-ssleay" ,perl-net-ssleay)))
+    (synopsis "Nearly transparent SSL encapsulation for IO::Socket::INET")
     (description
-     "The POSIX locale system is used to specify both the language
-conventions requested by the user and the preferred character set to consume
-and output.  The Encode::Locale module looks up the charset and encoding
-(called a CODESET in the locale jargon) and arranges for the Encode module
-to know this encoding under the name \"locale\".  It means bytes obtained
-from the environment can be converted to Unicode strings by calling
-Encode::encode(locale => $bytes) and converted back again with
-Encode::decode(locale => $string).")
-    (home-page "http://search.cpan.org/~gaas/Encode-Locale/")))
+     "IO::Socket::SSL makes using SSL/TLS much easier by wrapping the
+necessary functionality into the familiar IO::Socket interface and providing
+secure defaults whenever possible.  This way existing applications can be made
+SSL-aware without much effort, at least if you do blocking I/O and don't use
+select or poll.")
+    (license (package-license perl))
+    (home-page "https://github.com/noxxi/p5-io-socket-ssl")))
 
 (define-public perl-libwww
   (package
@@ -679,48 +783,70 @@ contains modules that are of more general use and even classes that
 help you implement simple HTTP servers.")
     (home-page "http://search.cpan.org/~gaas/libwww-perl/")))
 
-(define-public tinyproxy
+(define-public perl-lwp-mediatypes
   (package
-    (name "tinyproxy")
-    (version "1.8.3")
+    (name "perl-lwp-mediatypes")
+    (version "6.02")
     (source (origin
-              (method url-fetch)
-              (uri (string-append
-                    "http://www.samba.org/~obnox/" name "/download/"
-                    name "-" version ".tar.bz2"))
-              (sha256
-               (base32
-                "0vl9igw7vm924rs6d6bkib7zfclxnlf9s8rmml1sfwj7xda9nmdy"))))
-    (build-system gnu-build-system)
-    (arguments
-     `(#:configure-flags
-       (list
-        ;; For the log file, etc.
-        "--localstatedir=/var")
-       #:phases
-       (alist-cons-before
-        'build 'pre-build
-        (lambda* (#:key inputs #:allow-other-keys #:rest args)
-          ;; Uncommenting the next two lines may assist in debugging
-          ;; (substitute* "docs/man5/Makefile" (("a2x") "a2x -v"))
-          ;; (setenv "XML_DEBUG_CATALOG" "1")
-          #t)
-        %standard-phases)))
-    ;; All of the below are used to generate the documentation
-    ;; (Should they be propagated inputs of asciidoc ??)
-    (native-inputs `(("asciidoc" ,asciidoc)
-                     ("libxml2" ,libxml2) 
-                     ("docbook-xml" ,docbook-xml)
-                     ("docbook-xsl" ,docbook-xsl)
-                     ("libxslt" ,libxslt)))
-    (home-page "https://banu.com/tinyproxy/")
-    (synopsis "Light-weight HTTP/HTTPS proxy daemon")
-    (description "Tinyproxy is a light-weight HTTP/HTTPS proxy
-daemon.  Designed from the ground up to be fast and yet small, it is an ideal
-solution for use cases such as embedded deployments where a full featured HTTP
-proxy is required, but the system resources for a larger proxy are
-unavailable.")
-    (license l:gpl2+)))
+             (method url-fetch)
+             (uri (string-append
+                   "mirror://cpan/authors/id/G/GA/GAAS/LWP-MediaTypes-"
+                   version ".tar.gz"))
+             (sha256
+              (base32
+               "0xmnblp962qy02akah30sji8bxrqcyqlff2w95l199ghql60ny8q"))))
+    (build-system perl-build-system)
+    (license (package-license perl))
+    (synopsis "Perl module to guess the media type for a file or a URL")
+    (description
+     "The LWP::MediaTypes module provides functions for handling media (also
+known as MIME) types and encodings.  The mapping from file extensions to
+media types is defined by the media.types file.  If the ~/.media.types file
+exists it is used instead.")
+    (home-page "http://search.cpan.org/~gaas/LWP-MediaTypes/")))
+
+(define-public perl-net-http
+  (package
+    (name "perl-net-http")
+    (version "6.06")
+    (source (origin
+             (method url-fetch)
+             (uri (string-append
+                   "mirror://cpan/authors/id/G/GA/GAAS/Net-HTTP-"
+                   version ".tar.gz"))
+             (sha256
+              (base32
+               "1m1rvniffadq99gsy25298ia3lixwymr6kan64jd3ylyi7nkqkhx"))))
+    (build-system perl-build-system)
+    (license (package-license perl))
+    (synopsis "Perl low-level HTTP connection (client)")
+    (description
+     "The Net::HTTP class is a low-level HTTP client.  An instance of the
+Net::HTTP class represents a connection to an HTTP server.  The HTTP protocol
+is described in RFC 2616.  The Net::HTTP class supports HTTP/1.0 and
+HTTP/1.1.")
+    (home-page "http://search.cpan.org/~gaas/Net-HTTP/")))
+
+(define-public perl-uri
+  (package
+    (name "perl-uri")
+    (version "1.60")
+    (source (origin
+             (method url-fetch)
+             (uri (string-append
+                   "mirror://cpan/authors/id/G/GA/GAAS/URI-"
+                   version ".tar.gz"))
+             (sha256
+              (base32
+               "0xr31mf7lfrwhyvlx4pzp6p7alls5gi4bj8pk5g89f5cckfd74hz"))))
+    (build-system perl-build-system)
+    (license (package-license perl))
+    (synopsis "Perl Uniform Resource Identifiers (absolute and relative)")
+    (description
+     "The URI module implements the URI class.  Objects of this class
+represent \"Uniform Resource Identifier references\" as specified in RFC 2396
+and updated by RFC 2732.")
+    (home-page "http://search.cpan.org/~gaas/URI/")))
 
 (define-public perl-www-curl
   (package
@@ -745,151 +871,27 @@ library.")
     (license (package-license perl))
     (home-page "http://search.cpan.org/~szbalint/WWW-Curl-4.17/lib/WWW/Curl.pm")))
 
-(define-public perl-io-socket-ssl
+(define-public perl-www-robotrules
   (package
-    (name "perl-io-socket-ssl")
-    (version "2.002")
+    (name "perl-www-robotrules")
+    (version "6.02")
     (source (origin
-              (method url-fetch)
-              (uri (string-append "mirror://cpan/authors/id/S/SU/SULLR/"
-                                  "IO-Socket-SSL-" version ".tar.gz"))
-              (sha256
-               (base32
-                "1mph52lw6x5v44wf8mw00llzi8pp6k5c4jnrnrvlacrlfv260jb8"))))
+             (method url-fetch)
+             (uri (string-append
+                   "mirror://cpan/authors/id/G/GA/GAAS/WWW-RobotRules-"
+                   version ".tar.gz"))
+             (sha256
+              (base32
+               "07m50dp5n5jxv3m93i55qvnd67a6g7cvbvlik115kmc8lbkh5da6"))))
     (build-system perl-build-system)
-    (propagated-inputs `(("perl-net-ssleay" ,perl-net-ssleay)))
-    (synopsis "Nearly transparent SSL encapsulation for IO::Socket::INET")
-    (description
-     "IO::Socket::SSL makes using SSL/TLS much easier by wrapping the
-necessary functionality into the familiar IO::Socket interface and providing
-secure defaults whenever possible.  This way existing applications can be made
-SSL-aware without much effort, at least if you do blocking I/O and don't use
-select or poll.")
+    (propagated-inputs
+     `(("perl-uri" ,perl-uri)))
     (license (package-license perl))
-    (home-page "https://github.com/noxxi/p5-io-socket-ssl")))
-
-(define-public polipo
-  (package
-    (name "polipo")
-    (version "1.1.1")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (string-append
-             "http://www.pps.univ-paris-diderot.fr/~jch/software/files/polipo/polipo-"
-             version ".tar.gz"))
-       (sha256
-        (base32
-         "05g09sg9qkkhnc2mxldm1w1xkxzs2ylybkjzs28w8ydbjc3pand2"))))
-    (native-inputs `(("texinfo" ,texinfo)))
-    (build-system gnu-build-system)
-    (arguments
-     `(#:phases
-       (alist-delete 'configure %standard-phases)
-       #:make-flags (let ((out (assoc-ref %outputs "out")))
-                      (list (string-append "PREFIX=" out)
-                            (string-append "LOCAL_ROOT="
-                                           out "/share/polipo/www")
-                            "CC=gcc"))
-       ;; No 'check' target.
-       #:tests? #f))
-    (home-page "http://www.pps.univ-paris-diderot.fr/~jch/software/polipo/")
-    (synopsis "Small caching web proxy")
-    (description
-     "Polipo is a small caching web proxy (web cache, HTTP proxy, and proxy
-server).  It was primarily designed to be used by one person or a small group
-of people.")
-    (license l:expat)))
-
-(define-public libyaml
-  (package
-    (name "libyaml")
-    (version "0.1.5")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (string-append
-             "http://pyyaml.org/download/libyaml/yaml-"
-             version ".tar.gz"))
-       (sha256
-        (base32
-         "1vrv5ly58bkmcyc049ad180f2m8iav6l9h3v8l2fqdmrny7yx1zs"))))
-    (build-system gnu-build-system)
-    (home-page "http://pyyaml.org/wiki/LibYAML")
-    (synopsis "YAML 1.1 parser and emitter written in C")
+    (synopsis "Perl database of robots.txt-derived permissions")
     (description
-     "LibYAML is a YAML 1.1 parser and emitter written in C.")
-    (license l:expat)))
-
-(define-public libquvi-scripts
-  (package
-    (name "libquvi-scripts")
-    (version "0.4.21")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (string-append
-             "mirror://sourceforge/quvi/libquvi-scripts-" version ".tar.xz"))
-       (sha256
-        (base32 "0d0giry6bb57pnidymvdl7i5x9bq3ljk3g4bs294hcr5mj3cq0kw"))))
-    (build-system gnu-build-system)
-    (home-page "http://quvi.sourceforge.net/")
-    (synopsis "Media stream URL parser")
-    (description "This package contains support scripts called by libquvi to
-parse media stream properties.")
-    (license l:lgpl2.1+)))
-
-(define-public libquvi
-  (package
-    (name "libquvi")
-    (version "0.4.1")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (string-append
-             "mirror://sourceforge/quvi/libquvi-" version ".tar.xz"))
-       (sha256
-        (base32 "00x9gbmzc5cns0gnfag0hsphcr3cb33vbbb9s7ppvvd6bxz2z1mm"))))
-    (build-system gnu-build-system)
-    (native-inputs `(("pkg-config" ,pkg-config)))
-    (inputs
-     `(("curl" ,curl)
-       ("cyrus-sasl" ,cyrus-sasl)
-       ("libquvi-scripts" ,libquvi-scripts)
-       ("lua" ,lua-5.1)
-       ("openssl" ,openssl)
-       ("zlib" ,zlib)))
-    (arguments
-     ;; Lua provides no .pc file, so add CFLAGS/LIBS manually.
-     '(#:configure-flags
-       (let ((lua (assoc-ref %build-inputs "lua")))
-         (list
-          (string-append "liblua_CFLAGS=-I" lua "/include")
-          (string-append "liblua_LIBS=-L" lua "/libs -llua")))))
-    (home-page "http://quvi.sourceforge.net/")
-    (synopsis "Media stream URL parser")
-    (description "libquvi is a library with a C API for parsing media stream
-URLs and extracting their actual media files.")
-    (license l:lgpl2.1+)))
-
-(define-public quvi
-  (package
-    (name "quvi")
-    (version "0.4.2")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (string-append
-             "mirror://sourceforge/quvi/quvi-" version ".tar.xz"))
-       (sha256
-        (base32 "09lhl6dv5zpryasx7yjslfrcdcqlsbwapvd5lg7w6sm5x5n3k8ci"))))
-    (build-system gnu-build-system)
-    (native-inputs `(("pkg-config" ,pkg-config)))
-    (inputs
-     `(("curl" ,curl)
-       ("libquvi" ,libquvi)))
-    (home-page "http://quvi.sourceforge.net/")
-    (synopsis "Media stream URL parser")
-    (description "quvi is a command-line-tool suite to extract media files
-from streaming URLs.  It is a command-line wrapper for the libquvi library.")
-    (license l:lgpl2.1+)))
+     "The WWW::RobotRules module parses /robots.txt files as specified in
+\"A Standard for Robot Exclusion\", at
+<http://www.robotstxt.org/wc/norobots.html>.  Webmasters can use the
+/robots.txt file to forbid conforming robots from accessing parts of
+their web site.")
+    (home-page "http://search.cpan.org/~gaas/WWW-RobotRules/")))