Perl tiene algo parecido a OptionParser de python?

[neodani]

Buenas,

Sabéis si PERL tiene algun módulo o algo por el estilo igual que python para tratar la entrada de argumentos?

Código python:

from optparse import OptionParser
[...]
parser = OptionParser()
parser.add_option("-f", "--file", dest="filename",
                  help="write report to FILE", metavar="FILE")
parser.add_option("-q", "--quiet",
                  action="store_false", dest="verbose", default=True,
                  help="don't print status messages to stdout")
 

Referencia: http://docs.python.org/library/optparse.html

Necesito llamar al archivo pasandole unos argumentos y me gustaría saber si existe alguna forma de hacerlo como en python.

Muchas gracias de antemano!

[jferrero]

Entra en CPAN y pon a buscar la palabra GetOpt... y no te asustes...

[neodani]

Iniciado por jferrero

Entra en CPAN y pon a buscar la palabra GetOpt... y no te asustes...

Juasss! miedito... tengo que probarlos todos?

¿Por qué tanta variedad? mi no entender, los veo todos iguales...

[jferrero]

Sí, es cierto, se parecen mucho. Pero cada uno tiene una particularidad, a veces muy curiosa, como por ejemplo, uno que recuerdo que es capaz de generar las opciones que admite un programa generándoles a partir de la documentación pod integrada, por lo que matas dos pájaros de un tiro (haces la documentación y al mismo tiempo defines las opciones).

Para un trabajo normal, te vale con Getopt::Std (incluido en las distribuciones de Perl), o mejor, Getopt::Long, que es el que se parece más a lo que quieres hacer, me parece.