A Dimarts 07 Setembre 2010 12:01:00, Arnau Bria va escriure:
> Hola,
>
> Estic fent servir Getopt::Std per unes opcions en el meu script de perl
> i el tema de l'ajuda i la versió.
> la cosa és que al posar el --help em treu per pantalla l'ajuda i un
> misstage:
>
> [...]
> [Now continuing due to backward compatibility and excessive paranoia.
> See ``perldoc Getopt::Std'' about $Getopt::Std::STANDARD_HELP_VERSION.]
>
> Llegint el doc i alguns exemples de la xarxa el tema s'hauria de
> solucionar posant aquella variable a 1, però tot i posar-la, no
> aconsegueixo eliminar el puto missatge. (no és important ja que només
> fa referència a on treu l'ajuda).
>
> Algú sap on m'estic equivocant?
Asignes el valor a $Getopt::Std::STANDARD_HELP_VERSION abans de cridar getopts?
perl -MGetopt::Std -e'print getopts('oDI')."\n"' -- --help
-e version [unknown] calling Getopt::Std::getopts (version 1.06 [paranoid]),
running under Perl version 5.10.1.
Usage: -e [-OPTIONS [-MORE_OPTIONS]] [--] [PROGRAM_ARG1 ...]
The following single-character options are accepted:
Boolean (without arguments): -o -D -I
Options may be merged together. -- stops processing of options.
[Now continuing due to backward compatibility and excessive paranoia.
See ``perldoc Getopt::Std'' about $Getopt::Std::STANDARD_HELP_VERSION.]
1
jp...@pt001188:~$ perl -MGetopt::Std
-e'$Getopt::Std::STANDARD_HELP_VERSION=1;print getopts('oDI')."\n"' -- --help
-e version [unknown] calling Getopt::Std::getopts (version 1.06),
running under Perl version 5.10.1.
Usage: -e [-OPTIONS [-MORE_OPTIONS]] [--] [PROGRAM_ARG1 ...]
The following single-character options are accepted:
Boolean (without arguments): -o -D -I
Options may be merged together. -- stops processing of options.
--
_______________________________________________
Comandob mailing list
Comandob@badopi.org
http://lists.badopi.org/mailman/listinfo/comandob
