Pod::Simple::HTML(3p) Perl Programmers Reference Guide Pod::Simple::HTML(3p) #
Pod::Simple::HTML(3p) Perl Programmers Reference Guide Pod::Simple::HTML(3p)
NNAAMMEE #
Pod::Simple::HTML - convert Pod to HTML
SSYYNNOOPPSSIISS #
perl -MPod::Simple::HTML -e Pod::Simple::HTML::go thingy.pod
DDEESSCCRRIIPPTTIIOONN #
This class is for making an HTML rendering of a Pod document.
This is a subclass of Pod::Simple::PullParser and inherits all its
methods (and options).
Note that if you want to do a batch conversion of a lot of Pod documents
to HTML, you should see the module Pod::Simple::HTMLBatch.
CCAALLLLIINNGG FFRROOMM TTHHEE CCOOMMMMAANNDD LLIINNEE #
TODO #
perl -MPod::Simple::HTML -e Pod::Simple::HTML::go Thing.pod Thing.html
CCAALLLLIINNGG FFRROOMM PPEERRLL #
MMiinniimmaall ccooddee use Pod::Simple::HTML; my $p = Pod::Simple::HTML->new; $p->output_string(\my $html); $p->parse_file(‘path/to/Module/Name.pm’); open my $out, ‘>’, ‘out.html’ or die “Cannot open ‘out.html’: $!\n”; print $out $html;
MMoorree ddeettaaiilleedd eexxaammppllee use Pod::Simple::HTML;
Set the content type:
$Pod::Simple::HTML::Content_decl = q{<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" >};
my $p = Pod::Simple::HTML->new;
Include a single javascript source:
$p->html_javascript('http://abc.com/a.js');
Or insert multiple javascript source in the header (or for that matter
include anything, thought this is not recommended)
$p->html_javascript('
<script type="text/javascript" src="http://abc.com/b.js"></script>
<script type="text/javascript" src="http://abc.com/c.js"></script>');
Include a single css source in the header:
$p->html_css('/style.css');
or insert multiple css sources:
$p->html_css('
<link rel="stylesheet" type="text/css" title="pod_stylesheet" href="http://remote.server.com/jquery.css">
<link rel="stylesheet" type="text/css" title="pod_stylesheet" href="/style.css">');
Tell the parser where should the output go. In this case it will be
placed in the $html variable:
my $html;
$p->output_string(\$html);
Parse and process a file with pod in it:
$p->parse_file('path/to/Module/Name.pm');
MMEETTHHOODDSS #
TODO all (most?) accessorized methods
The following variables need to be set bbeeffoorree the call to the ->new
constructor.
Set the string that is included before the opening <html> tag:
$Pod::Simple::HTML::Doctype_decl = qq{<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">\n};
Set the content-type in the HTML head: (defaults to ISO-8859-1)
$Pod::Simple::HTML::Content_decl = q{<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" >};
Set the value that will be embedded in the opening tags of F, C tags and
verbatim text. F maps to <em>, C maps to <code>, Verbatim text maps to
<pre> (Computerese defaults to "")
$Pod::Simple::HTML::Computerese = ' class="some_class_name';
hhttmmll__ccssss hhttmmll__jjaavvaassccrriipptt ttiittllee__pprreeffiixx ttiittllee__ppoossttffiixx hhttmmll__hheeaaddeerr__bbeeffoorree__ttiittllee This includes everything before the
$p->html_header_before_title('<html><head><title>');
ttoopp__aanncchhoorr By default Pod::Simple::HTML adds a dummy anchor at the top of the HTML. You can change it by calling
$p->top_anchor('<a name="zz" >');
hhttmmll__hh__lleevveell Normally =head1 will become
, =head2 will become etc. Using the
html_h_level method will change these levels setting the h level of
=head1 tags:
$p->html_h_level(3);
Will make sure that =head1 will become <h3> and =head2 will become <h4>
etc...
$p->html_h_level(3);
Will make sure that =head1 will become <h3> and =head2 will become <h4>
etc...
iinnddeexx Set it to some true value if you want to have an index (in reality a table of contents) to be added at the top of the generated HTML.
$p->index(1);
hhttmmll__hheeaaddeerr__aafftteerr__ttiittllee Includes the closing tag of
$p->html_header_after_title('</title>...</head><body id="my_id">');
hhttmmll__ffooootteerr The very end of the document:
$p->html_footer( qq[\n<!-- end doc -->\n\n</body></html>\n] );
SSUUBBCCLLAASSSSIINNGG #
Can use any of the methods described above but for further customization
one needs to override some of the methods:
package My::Pod;
use strict;
use warnings;
use base 'Pod::Simple::HTML';
# needs to return a URL string such
# http://some.other.com/page.html
# #anchor_in_the_same_file
# /internal/ref.html
sub do_pod_link {
# My::Pod object and Pod::Simple::PullParserStartToken object
my ($self, $link) = @_;
say $link->tagname; # will be L for links
say $link->attr('to'); #
say $link->attr('type'); # will be 'pod' always
say $link->attr('section');
# Links local to our web site
if ($link->tagname eq 'L' and $link->attr('type') eq 'pod') {
my $to = $link->attr('to');
if ($to =~ /^Padre::/) {
$to =~ s{::}{/}g;
return "/docs/Padre/$to.html";
}
}
# all other links are generated by the parent class
my $ret = $self->SUPER::do_pod_link($link);
return $ret;
}
1;
Meanwhile in script.pl:
use My::Pod;
my $p = My::Pod->new;
my $html;
$p->output_string(\$html);
$p->parse_file('path/to/Module/Name.pm');
open my $out, '>', 'out.html' or die;
print $out $html;
TODO #
maybe override do_beginning do_end
SSEEEE AALLSSOO #
Pod::Simple, Pod::Simple::HTMLBatch
TODO: a corpus of sample Pod input and HTML output? Or common idioms?
SSUUPPPPOORRTT #
Questions or discussion about POD and Pod::Simple should be sent to the
pod-people@perl.org mail list. Send an empty email to
pod-people-subscribe@perl.org to subscribe.
This module is managed in an open GitHub repository,
<https://github.com/perl-pod/pod-simple/>. Feel free to fork and
contribute, or to clone <git://github.com/perl-pod/pod-simple.git> and
send patches!
Patches against Pod::Simple are welcome. Please send bug reports to
<bug-pod-simple@rt.cpan.org>.
CCOOPPYYRRIIGGHHTT AANNDD DDIISSCCLLAAIIMMEERRSS #
Copyright (c) 2002-2004 Sean M. Burke.
This library is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
This program is distributed in the hope that it will be useful, but
without any warranty; without even the implied warranty of
merchantability or fitness for a particular purpose.
AACCKKNNOOWWLLEEDDGGEEMMEENNTTSS #
Thanks to Hurricane Electric <http://he.net/> for permission to use its
Linux man pages online <http://man.he.net/> site for man page links.
Thanks to search.cpan.org <http://search.cpan.org/> for permission to use
the site for Perl module links.
AAUUTTHHOORR #
Pod::Simple was created by Sean M. Burke <sburke@cpan.org>. But don't
bother him, he's retired.
Pod::Simple is maintained by:
• Allison Randal "allison@perl.org"
• Hans Dieter Pearcey "hdp@cpan.org"
• David E. Wheeler "dwheeler@cpan.org"
perl v5.36.3 2023-02-15 Pod::Simple::HTML(3p)