?? latex.pm
字號(hào):
package Pod::LaTeX;=head1 NAMEPod::LaTeX - Convert Pod data to formatted Latex=head1 SYNOPSIS use Pod::LaTeX; my $parser = Pod::LaTeX->new ( ); $parser->parse_from_filehandle; $parser->parse_from_file ('file.pod', 'file.tex');=head1 DESCRIPTIONC<Pod::LaTeX> is a module to convert documentation in the Pod formatinto Latex. The L<B<pod2latex>|pod2latex> X<pod2latex> command usesthis module for translation.C<Pod::LaTeX> is a derived class from L<Pod::Select|Pod::Select>.=cutuse strict;require Pod::ParseUtils;use base qw/ Pod::Select /;# use Data::Dumper; # for debugginguse Carp;use vars qw/ $VERSION %HTML_Escapes @LatexSections /;$VERSION = '0.58';# Definitions of =headN -> latex mapping@LatexSections = (qw/ chapter section subsection subsubsection paragraph subparagraph /);# Standard escape sequences converted to Latex.# The Unicode name of each character is given in the comments.# Complete LaTeX set added by Peter Acklam.%HTML_Escapes = ( 'sol' => '\textfractionsolidus{}', # xxx - or should it be just '/' 'verbar' => '|', # The stuff below is based on the information available at # http://www.w3.org/TR/html401/sgml/entities.html # All characters in the range 0xA0-0xFF of the ISO 8859-1 character set. # Several of these characters require the `textcomp' LaTeX package. 'nbsp' => q|~|, # 0xA0 - no-break space = non-breaking space 'iexcl' => q|\textexclamdown{}|, # 0xA1 - inverted exclamation mark 'cent' => q|\textcent{}|, # 0xA2 - cent sign 'pound' => q|\textsterling{}|, # 0xA3 - pound sign 'curren' => q|\textcurrency{}|, # 0xA4 - currency sign 'yen' => q|\textyen{}|, # 0xA5 - yen sign = yuan sign 'brvbar' => q|\textbrokenbar{}|, # 0xA6 - broken bar = broken vertical bar 'sect' => q|\textsection{}|, # 0xA7 - section sign 'uml' => q|\textasciidieresis{}|, # 0xA8 - diaeresis = spacing diaeresis 'copy' => q|\textcopyright{}|, # 0xA9 - copyright sign 'ordf' => q|\textordfeminine{}|, # 0xAA - feminine ordinal indicator 'laquo' => q|\guillemotleft{}|, # 0xAB - left-pointing double angle quotation mark = left pointing guillemet 'not' => q|\textlnot{}|, # 0xAC - not sign 'shy' => q|\-|, # 0xAD - soft hyphen = discretionary hyphen 'reg' => q|\textregistered{}|, # 0xAE - registered sign = registered trade mark sign 'macr' => q|\textasciimacron{}|, # 0xAF - macron = spacing macron = overline = APL overbar 'deg' => q|\textdegree{}|, # 0xB0 - degree sign 'plusmn' => q|\textpm{}|, # 0xB1 - plus-minus sign = plus-or-minus sign 'sup2' => q|\texttwosuperior{}|, # 0xB2 - superscript two = superscript digit two = squared 'sup3' => q|\textthreesuperior{}|, # 0xB3 - superscript three = superscript digit three = cubed 'acute' => q|\textasciiacute{}|, # 0xB4 - acute accent = spacing acute 'micro' => q|\textmu{}|, # 0xB5 - micro sign 'para' => q|\textparagraph{}|, # 0xB6 - pilcrow sign = paragraph sign 'middot' => q|\textperiodcentered{}|, # 0xB7 - middle dot = Georgian comma = Greek middle dot 'cedil' => q|\c{}|, # 0xB8 - cedilla = spacing cedilla 'sup1' => q|\textonesuperior{}|, # 0xB9 - superscript one = superscript digit one 'ordm' => q|\textordmasculine{}|, # 0xBA - masculine ordinal indicator 'raquo' => q|\guillemotright{}|, # 0xBB - right-pointing double angle quotation mark = right pointing guillemet 'frac14' => q|\textonequarter{}|, # 0xBC - vulgar fraction one quarter = fraction one quarter 'frac12' => q|\textonehalf{}|, # 0xBD - vulgar fraction one half = fraction one half 'frac34' => q|\textthreequarters{}|, # 0xBE - vulgar fraction three quarters = fraction three quarters 'iquest' => q|\textquestiondown{}|, # 0xBF - inverted question mark = turned question mark 'Agrave' => q|\`A|, # 0xC0 - latin capital letter A with grave = latin capital letter A grave 'Aacute' => q|\'A|, # 0xC1 - latin capital letter A with acute 'Acirc' => q|\^A|, # 0xC2 - latin capital letter A with circumflex 'Atilde' => q|\~A|, # 0xC3 - latin capital letter A with tilde 'Auml' => q|\"A|, # 0xC4 - latin capital letter A with diaeresis 'Aring' => q|\AA{}|, # 0xC5 - latin capital letter A with ring above = latin capital letter A ring 'AElig' => q|\AE{}|, # 0xC6 - latin capital letter AE = latin capital ligature AE 'Ccedil' => q|\c{C}|, # 0xC7 - latin capital letter C with cedilla 'Egrave' => q|\`E|, # 0xC8 - latin capital letter E with grave 'Eacute' => q|\'E|, # 0xC9 - latin capital letter E with acute 'Ecirc' => q|\^E|, # 0xCA - latin capital letter E with circumflex 'Euml' => q|\"E|, # 0xCB - latin capital letter E with diaeresis 'Igrave' => q|\`I|, # 0xCC - latin capital letter I with grave 'Iacute' => q|\'I|, # 0xCD - latin capital letter I with acute 'Icirc' => q|\^I|, # 0xCE - latin capital letter I with circumflex 'Iuml' => q|\"I|, # 0xCF - latin capital letter I with diaeresis 'ETH' => q|\DH{}|, # 0xD0 - latin capital letter ETH 'Ntilde' => q|\~N|, # 0xD1 - latin capital letter N with tilde 'Ograve' => q|\`O|, # 0xD2 - latin capital letter O with grave 'Oacute' => q|\'O|, # 0xD3 - latin capital letter O with acute 'Ocirc' => q|\^O|, # 0xD4 - latin capital letter O with circumflex 'Otilde' => q|\~O|, # 0xD5 - latin capital letter O with tilde 'Ouml' => q|\"O|, # 0xD6 - latin capital letter O with diaeresis 'times' => q|\texttimes{}|, # 0xD7 - multiplication sign 'Oslash' => q|\O{}|, # 0xD8 - latin capital letter O with stroke = latin capital letter O slash 'Ugrave' => q|\`U|, # 0xD9 - latin capital letter U with grave 'Uacute' => q|\'U|, # 0xDA - latin capital letter U with acute 'Ucirc' => q|\^U|, # 0xDB - latin capital letter U with circumflex 'Uuml' => q|\"U|, # 0xDC - latin capital letter U with diaeresis 'Yacute' => q|\'Y|, # 0xDD - latin capital letter Y with acute 'THORN' => q|\TH{}|, # 0xDE - latin capital letter THORN 'szlig' => q|\ss{}|, # 0xDF - latin small letter sharp s = ess-zed 'agrave' => q|\`a|, # 0xE0 - latin small letter a with grave = latin small letter a grave 'aacute' => q|\'a|, # 0xE1 - latin small letter a with acute 'acirc' => q|\^a|, # 0xE2 - latin small letter a with circumflex 'atilde' => q|\~a|, # 0xE3 - latin small letter a with tilde 'auml' => q|\"a|, # 0xE4 - latin small letter a with diaeresis 'aring' => q|\aa{}|, # 0xE5 - latin small letter a with ring above = latin small letter a ring 'aelig' => q|\ae{}|, # 0xE6 - latin small letter ae = latin small ligature ae 'ccedil' => q|\c{c}|, # 0xE7 - latin small letter c with cedilla 'egrave' => q|\`e|, # 0xE8 - latin small letter e with grave 'eacute' => q|\'e|, # 0xE9 - latin small letter e with acute 'ecirc' => q|\^e|, # 0xEA - latin small letter e with circumflex 'euml' => q|\"e|, # 0xEB - latin small letter e with diaeresis 'igrave' => q|\`i|, # 0xEC - latin small letter i with grave 'iacute' => q|\'i|, # 0xED - latin small letter i with acute 'icirc' => q|\^i|, # 0xEE - latin small letter i with circumflex 'iuml' => q|\"i|, # 0xEF - latin small letter i with diaeresis 'eth' => q|\dh{}|, # 0xF0 - latin small letter eth 'ntilde' => q|\~n|, # 0xF1 - latin small letter n with tilde 'ograve' => q|\`o|, # 0xF2 - latin small letter o with grave 'oacute' => q|\'o|, # 0xF3 - latin small letter o with acute 'ocirc' => q|\^o|, # 0xF4 - latin small letter o with circumflex 'otilde' => q|\~o|, # 0xF5 - latin small letter o with tilde 'ouml' => q|\"o|, # 0xF6 - latin small letter o with diaeresis 'divide' => q|\textdiv{}|, # 0xF7 - division sign 'oslash' => q|\o{}|, # 0xF8 - latin small letter o with stroke, = latin small letter o slash 'ugrave' => q|\`u|, # 0xF9 - latin small letter u with grave 'uacute' => q|\'u|, # 0xFA - latin small letter u with acute 'ucirc' => q|\^u|, # 0xFB - latin small letter u with circumflex 'uuml' => q|\"u|, # 0xFC - latin small letter u with diaeresis 'yacute' => q|\'y|, # 0xFD - latin small letter y with acute 'thorn' => q|\th{}|, # 0xFE - latin small letter thorn 'yuml' => q|\"y|, # 0xFF - latin small letter y with diaeresis # Latin Extended-B 'fnof' => q|\textflorin{}|, # latin small f with hook = function = florin # Greek 'Alpha' => q|$\mathrm{A}$|, # greek capital letter alpha 'Beta' => q|$\mathrm{B}$|, # greek capital letter beta 'Gamma' => q|$\Gamma$|, # greek capital letter gamma 'Delta' => q|$\Delta$|, # greek capital letter delta 'Epsilon' => q|$\mathrm{E}$|, # greek capital letter epsilon 'Zeta' => q|$\mathrm{Z}$|, # greek capital letter zeta 'Eta' => q|$\mathrm{H}$|, # greek capital letter eta 'Theta' => q|$\Theta$|, # greek capital letter theta 'Iota' => q|$\mathrm{I}$|, # greek capital letter iota 'Kappa' => q|$\mathrm{K}$|, # greek capital letter kappa 'Lambda' => q|$\Lambda$|, # greek capital letter lambda 'Mu' => q|$\mathrm{M}$|, # greek capital letter mu 'Nu' => q|$\mathrm{N}$|, # greek capital letter nu 'Xi' => q|$\Xi$|, # greek capital letter xi 'Omicron' => q|$\mathrm{O}$|, # greek capital letter omicron 'Pi' => q|$\Pi$|, # greek capital letter pi 'Rho' => q|$\mathrm{R}$|, # greek capital letter rho 'Sigma' => q|$\Sigma$|, # greek capital letter sigma 'Tau' => q|$\mathrm{T}$|, # greek capital letter tau 'Upsilon' => q|$\Upsilon$|, # greek capital letter upsilon 'Phi' => q|$\Phi$|, # greek capital letter phi 'Chi' => q|$\mathrm{X}$|, # greek capital letter chi 'Psi' => q|$\Psi$|, # greek capital letter psi 'Omega' => q|$\Omega$|, # greek capital letter omega 'alpha' => q|$\alpha$|, # greek small letter alpha 'beta' => q|$\beta$|, # greek small letter beta 'gamma' => q|$\gamma$|, # greek small letter gamma 'delta' => q|$\delta$|, # greek small letter delta 'epsilon' => q|$\epsilon$|, # greek small letter epsilon 'zeta' => q|$\zeta$|, # greek small letter zeta 'eta' => q|$\eta$|, # greek small letter eta 'theta' => q|$\theta$|, # greek small letter theta 'iota' => q|$\iota$|, # greek small letter iota 'kappa' => q|$\kappa$|, # greek small letter kappa 'lambda' => q|$\lambda$|, # greek small letter lambda 'mu' => q|$\mu$|, # greek small letter mu 'nu' => q|$\nu$|, # greek small letter nu 'xi' => q|$\xi$|, # greek small letter xi 'omicron' => q|$o$|, # greek small letter omicron 'pi' => q|$\pi$|, # greek small letter pi 'rho' => q|$\rho$|, # greek small letter rho# 'sigmaf' => q||, # greek small letter final sigma 'sigma' => q|$\sigma$|, # greek small letter sigma 'tau' => q|$\tau$|, # greek small letter tau 'upsilon' => q|$\upsilon$|, # greek small letter upsilon 'phi' => q|$\phi$|, # greek small letter phi 'chi' => q|$\chi$|, # greek small letter chi 'psi' => q|$\psi$|, # greek small letter psi 'omega' => q|$\omega$|, # greek small letter omega# 'thetasym' => q||, # greek small letter theta symbol# 'upsih' => q||, # greek upsilon with hook symbol# 'piv' => q||, # greek pi symbol # General Punctuation 'bull' => q|\textbullet{}|, # bullet = black small circle # bullet is NOT the same as bullet operator 'hellip' => q|\textellipsis{}|, # horizontal ellipsis = three dot leader 'prime' => q|\textquotesingle{}|, # prime = minutes = feet 'Prime' => q|\textquotedbl{}|, # double prime = seconds = inches 'oline' => q|\textasciimacron{}|, # overline = spacing overscore 'frasl' => q|\textfractionsolidus{}|, # fraction slash # Letterlike Symbols 'weierp' => q|$\wp$|, # script capital P = power set = Weierstrass p 'image' => q|$\Re$|, # blackletter capital I = imaginary part 'real' => q|$\Im$|, # blackletter capital R = real part symbol 'trade' => q|\texttrademark{}|, # trade mark sign# 'alefsym' => q||, # alef symbol = first transfinite cardinal # alef symbol is NOT the same as hebrew letter alef, although the same # glyph could be used to depict both characters # Arrows 'larr' => q|\textleftarrow{}|, # leftwards arrow 'uarr' => q|\textuparrow{}|, # upwards arrow 'rarr' => q|\textrightarrow{}|, # rightwards arrow 'darr' => q|\textdownarrow{}|, # downwards arrow 'harr' => q|$\leftrightarrow$|, # left right arrow# 'crarr' => q||, # downwards arrow with corner leftwards = carriage return 'lArr' => q|$\Leftarrow$|, # leftwards double arrow # ISO 10646 does not say that lArr is the same as the 'is implied by' # arrow but also does not have any other character for that function. So # lArr can be used for 'is implied by' as ISOtech suggests 'uArr' => q|$\Uparrow$|, # upwards double arrow 'rArr' => q|$\Rightarrow$|, # rightwards double arrow # ISO 10646 does not say this is the 'implies' character but does not # have another character with this function so ? rArr can be used for # 'implies' as ISOtech suggests 'dArr' => q|$\Downarrow$|, # downwards double arrow 'hArr' => q|$\Leftrightarrow$|, # left right double arrow # Mathematical Operators. # Some of these require the `amssymb' package. 'forall' => q|$\forall$|, # for all 'part' => q|$\partial$|, # partial differential 'exist' => q|$\exists$|, # there exists 'empty' => q|$\emptyset$|, # empty set = null set = diameter 'nabla' => q|$\nabla$|, # nabla = backward difference 'isin' => q|$\in$|, # element of 'notin' => q|$\notin$|, # not an element of 'ni' => q|$\ni$|, # contains as member 'prod' => q|$\prod$|, # n-ary product = product sign # prod is NOT the same character as 'greek capital letter pi' though the # same glyph might be used for both 'sum' => q|$\sum$|, # n-ary sumation # sum is NOT the same character as 'greek capital letter sigma' though # the same glyph might be used for both 'minus' => q|$-$|, # minus sign 'lowast' => q|$\ast$|, # asterisk operator 'radic' => q|$\surd$|, # square root = radical sign 'prop' => q|$\propto$|, # proportional to 'infin' => q|$\infty$|, # infinity 'ang' => q|$\angle$|, # angle 'and' => q|$\wedge$|, # logical and = wedge 'or' => q|$\vee$|, # logical or = vee 'cap' => q|$\cap$|, # intersection = cap 'cup' => q|$\cup$|, # union = cup 'int' => q|$\int$|, # integral 'there4' => q|$\therefore$|, # therefore 'sim' => q|$\sim$|, # tilde operator = varies with = similar to # tilde operator is NOT the same character as the tilde 'cong' => q|$\cong$|, # approximately equal to 'asymp' => q|$\asymp$|, # almost equal to = asymptotic to 'ne' => q|$\neq$|, # not equal to 'equiv' => q|$\equiv$|, # identical to 'le' => q|$\leq$|, # less-than or equal to 'ge' => q|$\geq$|, # greater-than or equal to 'sub' => q|$\subset$|, # subset of 'sup' => q|$\supset$|, # superset of # note that nsup, 'not a superset of' is not covered by the Symbol font # encoding and is not included. 'nsub' => q|$\not\subset$|, # not a subset of 'sube' => q|$\subseteq$|, # subset of or equal to 'supe' => q|$\supseteq$|, # superset of or equal to 'oplus' => q|$\oplus$|, # circled plus = direct sum 'otimes' => q|$\otimes$|, # circled times = vector product 'perp' => q|$\perp$|, # up tack = orthogonal to = perpendicular 'sdot' => q|$\cdot$|, # dot operator # dot operator is NOT the same character as middle dot # Miscellaneous Technical 'lceil' => q|$\lceil$|, # left ceiling = apl upstile 'rceil' => q|$\rceil$|, # right ceiling 'lfloor' => q|$\lfloor$|, # left floor = apl downstile 'rfloor' => q|$\rfloor$|, # right floor 'lang' => q|$\langle$|, # left-pointing angle bracket = bra # lang is NOT the same character as 'less than' or 'single left-pointing # angle quotation mark' 'rang' => q|$\rangle$|, # right-pointing angle bracket = ket # rang is NOT the same character as 'greater than' or 'single # right-pointing angle quotation mark' # Geometric Shapes 'loz' => q|$\lozenge$|, # lozenge # Miscellaneous Symbols 'spades' => q|$\spadesuit$|, # black spade suit 'clubs' => q|$\clubsuit$|, # black club suit = shamrock 'hearts' => q|$\heartsuit$|, # black heart suit = valentine 'diams' => q|$\diamondsuit$|, # black diamond suit # C0 Controls and Basic Latin 'quot' => q|"|, # quotation mark = APL quote ["] 'amp' => q|\&|, # ampersand 'lt' => q|<|, # less-than sign 'gt' => q|>|, # greater-than sign 'OElig' => q|\OE{}|, # latin capital ligature OE 'oelig' => q|\oe{}|, # latin small ligature oe 'Scaron' => q|\v{S}|, # latin capital letter S with caron 'scaron' => q|\v{s}|, # latin small letter s with caron 'Yuml' => q|\"Y|, # latin capital letter Y with diaeresis 'circ' => q|\textasciicircum{}|, # modifier letter circumflex accent 'tilde' => q|\textasciitilde{}|, # small tilde 'ensp' => q|\phantom{n}|, # en space 'emsp' => q|\hspace{1em}|, # em space 'thinsp' => q|\,|, # thin space 'zwnj' => q|{}|, # zero width non-joiner# 'zwj' => q||, # zero width joiner# 'lrm' => q||, # left-to-right mark# 'rlm' => q||, # right-to-left mark 'ndash' => q|--|, # en dash 'mdash' => q|---|, # em dash 'lsquo' => q|\textquoteleft{}|, # left single quotation mark 'rsquo' => q|\textquoteright{}|, # right single quotation mark 'sbquo' => q|\quotesinglbase{}|, # single low-9 quotation mark 'ldquo' => q|\textquotedblleft{}|, # left double quotation mark 'rdquo' => q|\textquotedblright{}|, # right double quotation mark 'bdquo' => q|\quotedblbase{}|, # double low-9 quotation mark 'dagger' => q|\textdagger{}|, # dagger 'Dagger' => q|\textdaggerdbl{}|, # double dagger 'permil' => q|\textperthousand{}|, # per mille sign 'lsaquo' => q|\guilsinglleft{}|, # single left-pointing angle quotation mark 'rsaquo' => q|\guilsinglright{}|, # single right-pointing angle quotation mark 'euro' => q|\texteuro{}|, # euro sign);=head1 OBJECT METHODSThe following methods are provided in this module. Methods inheritedfrom C<Pod::Select> are not described in the public interface.=over 4=begin __PRIVATE__=item C<initialize>Initialise the object. This method is subclassed from C<Pod::Parser>.The base class method is invoked. This method defines the defaultbehaviour of the object unless overridden by supplying arguments tothe constructor. Internal settings are defaulted as well as the public instance data.Internal hash values are accessed directly (rather than througha method) and start with an underscore.This method should not be invoked by the user directly.=end __PRIVATE__=cut# - An array for nested lists# Arguments have already been read by this pointsub initialize { my $self = shift; # print Dumper($self); # Internals $self->{_Lists} = []; # For nested lists $self->{_suppress_all_para} = 0; # For =begin blocks $self->{_dont_modify_any_para}=0; # For =begin blocks $self->{_CURRENT_HEAD1} = ''; # Name of current HEAD1 section # Options - only initialise if not already set # Cause the '=head1 NAME' field to be treated specially # The contents of the NAME paragraph will be converted # to a section title. All subsequent =head1 will be converted # to =head2 and down. Will not affect =head1's prior to NAME # Assumes: 'Module - purpose' format # Also creates a purpose field # The name is used for Labeling of the subsequent subsections $self->{ReplaceNAMEwithSection} = 0 unless exists $self->{ReplaceNAMEwithSection}; $self->{AddPreamble} = 1 # make full latex document unless exists $self->{AddPreamble}; $self->{StartWithNewPage} = 0 # Start new page for pod section unless exists $self->{StartWithNewPage}; $self->{TableOfContents} = 0 # Add table of contents unless exists $self->{TableOfContents}; # only relevent if AddPreamble=1 $self->{AddPostamble} = 1 # Add closing latex code at end unless exists $self->{AddPostamble}; # effectively end{document} and index $self->{MakeIndex} = 1 # Add index (only relevant AddPostamble unless exists $self->{MakeIndex}; # and AddPreamble) $self->{UniqueLabels} = 1 # Use label unique for each pod unless exists $self->{UniqueLabels}; # either based on the filename # or supplied # Control the level of =head1. default is \section # $self->{Head1Level} = 1 # Offset in latex sections unless exists $self->{Head1Level}; # 0 is chapter, 2 is subsection # Control at which level numbering of sections is turned off # ie subsection becomes subsection* # The numbering is relative to the latex sectioning commands # and is independent of Pod heading level # default is to number \section but not \subsection $self->{LevelNoNum} = 2 unless exists $self->{LevelNoNum}; # Label to be used as prefix to all internal section names # If not defined will attempt to derive it from the filename # This can not happen when running parse_from_filehandle though # hence the ability to set the label externally # The label could then be Pod::Parser_DESCRIPTION or somesuch $self->{Label} = undef # label to be used as prefix unless exists $self->{Label}; # to all internal section names # These allow the caller to add arbritrary latex code to # start and end of document. AddPreamble and AddPostamble are ignored # if these are set. # Also MakeIndex and TableOfContents are also ignored. $self->{UserPreamble} = undef # User supplied start (AddPreamble =1) unless exists $self->{Label}; $self->{UserPostamble} = undef # Use supplied end (AddPostamble=1) unless exists $self->{Label}; # Run base initialize $self->SUPER::initialize;}=back=head2 Data AccessorsThe following methods are provided for accessing instance data. Thesemethods should be used for accessing configuration parameters ratherthan assuming the object is a hash.
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -