Comment puis-je me débarrasser des lignes vides Perl's Pod pour qu'elles n'apparaissent pas avec Pod :: Usage?

Question

Je pod suivant que j'utilisé avec getopt :: longue:

 
=head1 SYNOPSIS 

foo [OPTION]... [URL]... 

=head1 OPTIONS 

=over 20 

=item B<-h, --help> 

Print a brief help message and exits. 

=item B<-i, --input=FILE> 

Reads from FILE 

=back 

=cut 

et quand je FOURNIT -h il produit:

 
Usage: 
    foo [OPTION]... [URL]... 

Options: 
    -h, --help   Print a brief help message and exits. 

    -i, --input=FILE Reads from FILE 

Ma question est: comment puis-je supprimer la ligne vide entre - h et -i?

Answer 1

Pod::Usage appelle simplement un formateur Pod comme perldoc ou Text::Pod pour générer les messages d'utilisation de votre Pod. Le code Pod que vous avez écrit sera formaté avec quelques lignes vides par ces outils. Si vous ne voulez pas ceux-ci, écrivez Pod différent. Par exemple

=over 4 

=item B<-h>      Print a brief help message and exits. 

=item B<-i>, B<--input=FILE> Reads from FILE 

=back 

Malheureusement, ce ne sera pas aussi agréable quand être converti en d'autres formats tels que HTML, et que vous perdez l'alignement vertical belle des options et leurs descriptions. Cependant, étant donné que Pod::Usage est vraiment destiné aux programmes en ligne de commande, il semble raisonnable d'optimiser la lisibilité du texte sur un terminal au lieu d'avoir des choses en HTML ou similaires.