in reply to MooseX::Getopt help without nagging
I have all the functionality in Moose module files, and then have a short .pl file to bring it all together.
prepaprse_args() my $xyz = XYZ::ABC->new_with_options(); # obfuscated to protect my e +mployment $xyz->run(); __END__
In preparse_args I quickly scan the args for -man or --man, which I handle with pod2usage. I also accept '-man modules', in which case I print a list of all the custom modules in the program ... the non CPAN ones. With the request '-man XYZ::ABC.pm', I print the pod for that one module. This way I have access to user documentation as well as inner details.
As Occam said: Entia non sunt multiplicanda praeter necessitatem.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: MooseX::Getopt help without nagging
by Boldra (Curate) on Aug 26, 2010 at 06:06 UTC |