DOKK / manpages / debian 12 / libmousex-getopt-perl / MouseX::Getopt::GLD.3pm.en
MouseX::Getopt::GLD(3pm) User Contributed Perl Documentation MouseX::Getopt::GLD(3pm)

  ## In your class
  package My::App;
  use Mouse;
  with 'MouseX::Getopt::GLD';
  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
2021-09-16 perl v5.32.1