This is just a quick hack on the example that comes with HTTP::Daemon to serve your local perl documentation out with http. I rather like the way ActiveState perl on windows formats the docs, so I did this to read them when I'm working on my linux box.

I realize this is not secure, it is in no way meant to be, it only binds to localhost on port 83 because of this. Open it up to the world at your own discretion. Browsing to http://localhost:83 will give error 501/505 to avoid uninvited guests, you must request http://localhost:83/index.html to load the page. 
#!/usr/bin/perl

use strict;
use warnings;
use HTTP::Daemon;
use HTTP::Status;
my $perldocs = 'c:/Perl/html/';
my $n = "\n";

my $d = HTTP::Daemon->new(LocalAddr=>'localhost',LocalPort=>83) || die
+;
print "Listening on: <URL:", $d->url, ">\n";

  while (my $c = $d->accept) {
      while (my $r = $c->get_request) {
      print $r->method." ".$r->url->path.$n;

      if ($r->method eq 'GET') {
          -e $perldocs.$r->url->path
          ?  $c->send_file_response($perldocs.$r->url->path)
          :  $c->send_error(RC_NOT_FOUND);
      } else {
              $c->send_error(RC_FORBIDDEN)
          }
      }
      $c->close;
      undef($c);
  }

[download]
I was inspired to post this after seeing perldoc.cgi this morning. Anyone care to merge them?

In reply to Serve local perl docs with HTTP::Daemon by elwarren

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.