159 lines
2.6 KiB
Batchfile
159 lines
2.6 KiB
Batchfile
|
@rem = '--*-Perl-*--
|
||
|
|
@echo off
|
||
|
|
if "%OS%" == "Windows_NT" goto WinNT
|
||
|
|
perl -x -S "%0" %1 %2 %3 %4 %5 %6 %7 %8 %9
|
||
|
|
goto endofperl
|
||
|
|
:WinNT
|
||
|
|
perl -x -S "%0" %*
|
||
|
|
if NOT "%COMSPEC%" == "%SystemRoot%\system32\cmd.exe" goto endofperl
|
||
|
|
if %errorlevel% == 9009 echo You do not have Perl in your PATH.
|
||
|
|
goto endofperl
|
||
|
|
@rem ';
|
||
|
|
#!perl
|
||
|
|
#line 14
|
||
|
|
eval 'exec P:\Apps\ActivePerl\temp\bin\MSWin32-x86-object\perl.exe -S $0 ${1+"$@"}'
|
||
|
|
if $running_under_some_shell;
|
||
|
|
=pod
|
||
|
|
|
||
|
|
=head1 NAME
|
||
|
|
|
||
|
|
pod2html - convert .pod files to .html files
|
||
|
|
|
||
|
|
=head1 SYNOPSIS
|
||
|
|
|
||
|
|
pod2html --help --htmlroot=<name> --infile=<name> --outfile=<name>
|
||
|
|
--podpath=<name>:...:<name> --podroot=<name>
|
||
|
|
--libpods=<name>:...:<name> --recurse --norecurse --verbose
|
||
|
|
--index --noindex --title=<name>
|
||
|
|
|
||
|
|
=head1 DESCRIPTION
|
||
|
|
|
||
|
|
Converts files from pod format (see L<perlpod>) to HTML format.
|
||
|
|
|
||
|
|
=head1 ARGUMENTS
|
||
|
|
|
||
|
|
pod2html takes the following arguments:
|
||
|
|
|
||
|
|
=over 4
|
||
|
|
|
||
|
|
=item help
|
||
|
|
|
||
|
|
--help
|
||
|
|
|
||
|
|
Displays the usage message.
|
||
|
|
|
||
|
|
=item htmlroot
|
||
|
|
|
||
|
|
--htmlroot=name
|
||
|
|
|
||
|
|
Sets the base URL for the HTML files. When cross-references are made,
|
||
|
|
the HTML root is prepended to the URL.
|
||
|
|
|
||
|
|
=item infile
|
||
|
|
|
||
|
|
--infile=name
|
||
|
|
|
||
|
|
Specify the pod file to convert. Input is taken from STDIN if no
|
||
|
|
infile is specified.
|
||
|
|
|
||
|
|
=item outfile
|
||
|
|
|
||
|
|
--outfile=name
|
||
|
|
|
||
|
|
Specify the HTML file to create. Output goes to STDOUT if no outfile
|
||
|
|
is specified.
|
||
|
|
|
||
|
|
=item podroot
|
||
|
|
|
||
|
|
--podroot=name
|
||
|
|
|
||
|
|
Specify the base directory for finding library pods.
|
||
|
|
|
||
|
|
=item podpath
|
||
|
|
|
||
|
|
--podpath=name:...:name
|
||
|
|
|
||
|
|
Specify which subdirectories of the podroot contain pod files whose
|
||
|
|
HTML converted forms can be linked-to in cross-references.
|
||
|
|
|
||
|
|
=item libpods
|
||
|
|
|
||
|
|
--libpods=name:...:name
|
||
|
|
|
||
|
|
List of page names (eg, "perlfunc") which contain linkable C<=item>s.
|
||
|
|
|
||
|
|
=item netscape
|
||
|
|
|
||
|
|
--netscape
|
||
|
|
|
||
|
|
Use Netscape HTML directives when applicable.
|
||
|
|
|
||
|
|
=item nonetscape
|
||
|
|
|
||
|
|
--nonetscape
|
||
|
|
|
||
|
|
Do not use Netscape HTML directives (default).
|
||
|
|
|
||
|
|
=item index
|
||
|
|
|
||
|
|
--index
|
||
|
|
|
||
|
|
Generate an index at the top of the HTML file (default behaviour).
|
||
|
|
|
||
|
|
=item noindex
|
||
|
|
|
||
|
|
--noindex
|
||
|
|
|
||
|
|
Do not generate an index at the top of the HTML file.
|
||
|
|
|
||
|
|
|
||
|
|
=item recurse
|
||
|
|
|
||
|
|
--recurse
|
||
|
|
|
||
|
|
Recurse into subdirectories specified in podpath (default behaviour).
|
||
|
|
|
||
|
|
=item norecurse
|
||
|
|
|
||
|
|
--norecurse
|
||
|
|
|
||
|
|
Do not recurse into subdirectories specified in podpath.
|
||
|
|
|
||
|
|
=item title
|
||
|
|
|
||
|
|
--title=title
|
||
|
|
|
||
|
|
Specify the title of the resulting HTML file.
|
||
|
|
|
||
|
|
=item verbose
|
||
|
|
|
||
|
|
--verbose
|
||
|
|
|
||
|
|
Display progress messages.
|
||
|
|
|
||
|
|
=back
|
||
|
|
|
||
|
|
=head1 AUTHOR
|
||
|
|
|
||
|
|
Tom Christiansen, E<lt>tchrist@perl.comE<gt>.
|
||
|
|
|
||
|
|
=head1 BUGS
|
||
|
|
|
||
|
|
See L<Pod::Html> for a list of known bugs in the translator.
|
||
|
|
|
||
|
|
=head1 SEE ALSO
|
||
|
|
|
||
|
|
L<perlpod>, L<Pod::Html>
|
||
|
|
|
||
|
|
=head1 COPYRIGHT
|
||
|
|
|
||
|
|
This program is distributed under the Artistic License.
|
||
|
|
|
||
|
|
=cut
|
||
|
|
|
||
|
|
use Pod::Html;
|
||
|
|
|
||
|
|
pod2html @ARGV;
|
||
|
|
__END__
|
||
|
|
:endofperl
|