1 .\" Automatically generated by Pod::Man v1.37, Pod::Parser v1.3
4 .\" ========================================================================
5 .de Sh \" Subsection heading
13 .de Sp \" Vertical space (when we can't use .PP)
17 .de Vb \" Begin verbatim text
22 .de Ve \" End verbatim text
26 .\" Set up some character translations and predefined strings. \*(-- will
27 .\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
28 .\" double quote, and \*(R" will give a right double quote. | will give a
29 .\" real vertical bar. \*(C+ will give a nicer C++. Capital omega is used to
30 .\" do unbreakable dashes and therefore won't be available. \*(C` and \*(C'
31 .\" expand to `' in nroff, nothing in troff, for use with C<>.
33 .ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
37 . if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
38 . if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch
51 .\" If the F register is turned on, we'll generate index entries on stderr for
52 .\" titles (.TH), headers (.SH), subsections (.Sh), items (.Ip), and index
53 .\" entries marked with X<> in POD. Of course, you'll have to process the
54 .\" output yourself in some meaningful fashion.
57 . tm Index:\\$1\t\\n%\t"\\$2"
63 .\" For nroff, turn off justification. Always turn off hyphenation; it makes
64 .\" way too many mistakes in technical documents.
68 .\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
69 .\" Fear. Run. Save yourself. No user-serviceable parts.
70 . \" fudge factors for nroff and troff
79 . ds #H ((1u-(\\\\n(.fu%2u))*.13m)
85 . \" simple accents for nroff and troff
95 . ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u"
96 . ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u'
97 . ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u'
98 . ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u'
99 . ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u'
100 . ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u'
102 . \" troff and (daisy-wheel) nroff accents
103 .ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V'
104 .ds 8 \h'\*(#H'\(*b\h'-\*(#H'
105 .ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#]
106 .ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H'
107 .ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u'
108 .ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#]
109 .ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#]
110 .ds ae a\h'-(\w'a'u*4/10)'e
111 .ds Ae A\h'-(\w'A'u*4/10)'E
112 . \" corrections for vroff
113 .if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u'
114 .if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u'
115 . \" for low resolution devices (crt and lpr)
116 .if \n(.H>23 .if \n(.V>19 \
129 .\" ========================================================================
131 .IX Title "Template::Plugin::Wrap 3"
132 .TH Template::Plugin::Wrap 3 "2008-11-13" "perl v5.8.7" "User Contributed Perl Documentation"
134 Template::Plugin::Wrap \- Plugin interface to Text::Wrap
136 .IX Header "SYNOPSIS"
142 \& # call wrap subroutine
143 \& [% wrap(mytext, width, initial_tab, subsequent_tab) %]
147 \& # or use wrap FILTER
148 \& [% mytext FILTER wrap(width, initital_tab, subsequent_tab) %]
151 .IX Header "DESCRIPTION"
152 This plugin provides an interface to the Text::Wrap module which
153 provides simple paragraph formatting.
155 It defines a \f(CW\*(C`wrap\*(C'\fR subroutine which can be called, passing the input
156 text and further optional parameters to specify the page width (default:
157 72), and tab characters for the first and subsequent lines (no defaults).
164 \& [% text = BLOCK %]
165 \& First, attach the transmutex multiplier to the cross\-wired
166 \& quantum homogeniser.
171 \& [% wrap(text, 40, '* ', ' ') %]
177 \& * First, attach the transmutex
178 \& multiplier to the cross\-wired quantum
182 It also registers a \f(CW\*(C`wrap\*(C'\fR filter which accepts the same three optional
183 arguments but takes the input text directly via the filter input.
188 \& [% FILTER bullet = wrap(40, '* ', ' ') \-%]
189 \& First, attach the transmutex multiplier to the cross\-wired quantum
197 \& * First, attach the transmutex
198 \& multiplier to the cross\-wired quantum
205 \& [% FILTER bullet \-%]
206 \& Then remodulate the shield to match the harmonic frequency, taking
207 \& care to correct the phase difference.
214 \& * Then remodulate the shield to match
215 \& the harmonic frequency, taking
216 \& care to correct the phase difference.
220 Andy Wardley <abw@wardley.org> <http://wardley.org/>
222 The Text::Wrap module was written by David Muir Sharnoff
223 with help from Tim Pierce and many others.
225 .IX Header "COPYRIGHT"
226 Copyright (C) 1996\-2007 Andy Wardley. All Rights Reserved.
228 This module is free software; you can redistribute it and/or
229 modify it under the same terms as Perl itself.
231 .IX Header "SEE ALSO"
232 Template::Plugin, Text::Wrap