de l'utilisation de pod2usage ?

Marsh Posté le 24-10-2007 à 14:03:14

Bonjour à tous,

depuis le début, je mettais en place des solutions personnalisées pour afficher les messages d'aide et d'usage pour mes scripts. J'ai donc découvert avec plaisir Pod::Usage au détour d'un surf.

Mais j'ai des soucis à l'utilisation J'ai l'impression que, même en utilisant des exemples simples, ça ne marche pas comme cela devrait :'(

Dans le programme suivant, le message "**Page de Manuel**" ne s'affiche pas quand j'utilise --man...
Et le --version n'affiche pas que la section VERSION mais toute l'aide (comme man en fait).

Est-ce normal, ai-je raté quelque chose ? Pourtant, j'ai l'impression d'avoir bien collé aux exemples trouvés sur le net :roll:

Code :

use strict;
use Getopt::Long;
use Pod::Usage;
use Data::Dumper;
my $help = 0;
my $man = 0;
my $version = 0;
GetOptions('help|?' => \$help, 'man' => \$man, 'version' => \$version) or pod2usage(2);
pod2usage(1) if $help;
pod2usage(-message => "**Page de Manuel**", -verbose => 2) if $man;
pod2usage(-verbose => 99, -section => 'VERSION') if $version;
pod2usage("$0: Pas assez d'arguments.\n" ) if ($#ARGV < 0);
print Dumper(@ARGV);
__END__
=head1 NAME
testoptions3 - TESTESTEST
=head1 SYNOPSIS
testoptions3 [options]
Options:
--help | -? court message d'aide
--man page du manual
--version | -v version du programme
=head1 OPTIONS
=over 8
=item B<--help>
Affiche un court message d'aide et sort du programme.
=item B<--man>
Affiche la page de manuel du programme et sort.
=item B<--version>
Affiche la version du programme et sort.
=back
=head1 DESCRIPTION
B<Ce programme> teste pod2usage.
=head1 VERSION
testoptions3.pl - version 1.0
=cut

merci d'avance

Edit: si je passe le mode -verbose à 1 dans

Code :

pod2usage(-message => "**Page de Manuel**", -verbose => 2) if $man;

comme cela :

Code :

pod2usage(-message => "**Page de Manuel**", -verbose => 1) if $man;

alors le message "**Page de Manuel**" s'affiche bien ?! Sauf que tout le texte n'apparait plus puisque je suis en mode verbose 1 et non 2...

Par contre, pas moyen de n'avoir que la section VERSION :-/ même en changeant le verbose

edit pour le déplacement: j'avais hésité entre module et langages, mais comme la description est "Vos questions et problèmes sur l'installation, la création de modules et packages Perl sur différents OS", je me suis dit que cela ne concernait pas l'utilisation

Reply

Marsh Posté le 24-10-2007 à 14:03:14

Reply

Marsh Posté le 25-10-2007 à 10:16:47

deuxième tentative :bounce:

Message édité par lennelei le 25-10-2007 à 10:17:01

Reply

de l'utilisation de pod2usage ?

Sujets relatifs:

Leave a Replay