## In your class
package My::App;
use Mouse;
with 'MouseX::Getopt::Basic';
has 'out' => (is => 'rw', isa => 'Str', required => 1);
has 'in' => (is => 'rw', isa => 'Str', required => 1);
# ... rest of the class here
## in your script
#!/usr/bin/perl
use My::App;
my $app = My::App->new_with_options();
# ... rest of the script here
## on the command line
% perl my_app_script.pl --in file.input --out file.dump
This is like MouseX::Getopt and can be used instead except that it
doesn't make use of Getopt::Long::Descriptive (or "GLD" for
short).
- new_with_options
- See "new_with_options" in MouseX::Getopt.