note
Athanasius
<p>The following is a kludge, but may be worth a try:</p>
<p>Change the second:</p>
<code>
=head1 SYNOPSIS
</code>
to (say):
<code>
=head1 MAIN
</code>
<p>and then invoke <c>pod2usage</c> as:</p>
<c>
Pod::Usage::pod2usage( pod2usage(-verbose => 99,
-sections => [ qw(MAIN) ] ) )
if ( $CONFIG{ 'help' } );
</c>
<p>See <tt>-sections</tt> in the “Arguments” section of [mod://Pod::Usage].</p>
<p>Hope that helps,</p>
<div class="pmsig"><div class="pmsig-968231">
<p>
<table width="100%">
<tr>
<td align="left">
Athanasius <font color="#008000"><</font>[href://http://www.biblegateway.com/passage/?search=John%203:16&version=NLV|<font color="#008000">°</font>]<font color="#008000">(((><</font> <i>contra mundum</i>
</td>
<td align="right">
[href://http://translate.google.com.au/#la/en/Iustus%20alius%20egestas%20vitae%2C%20eros%20Piratica%2C|<b>Iustus alius egestas vitae, eros Piratica,</b>]
</td>
</tr>
</table>
</p>
</div></div>
1015240
1015240