/usr/share/perl5/MooseX/Getopt/ProcessedArgv.pm is in libmoosex-getopt-perl 0.59-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 | package MooseX::Getopt::ProcessedArgv;
{
$MooseX::Getopt::ProcessedArgv::VERSION = '0.59';
}
BEGIN {
$MooseX::Getopt::ProcessedArgv::AUTHORITY = 'cpan:STEVAN';
}
use Moose;
# ABSTRACT: MooseX::Getopt::ProcessedArgv - Class containing the results of process_argv
has 'argv_copy' => (is => 'ro', isa => 'ArrayRef');
has 'extra_argv' => (is => 'ro', isa => 'ArrayRef');
has 'usage' => (is => 'ro', isa => 'Maybe[Object]');
has 'constructor_params' => (is => 'ro', isa => 'HashRef');
has 'cli_params' => (is => 'ro', isa => 'HashRef');
no Moose;
__PACKAGE__->meta->make_immutable();
1;
__END__
=pod
=encoding UTF-8
=for :stopwords Stevan Little Infinity Interactive, Inc
=head1 NAME
MooseX::Getopt::ProcessedArgv - MooseX::Getopt::ProcessedArgv - Class containing the results of process_argv
=head1 VERSION
version 0.59
=head1 SYNOPSIS
use My::App;
my $pa = My::App->process_argv(@params);
my $argv_copy = $pa->argv_copy();
my $extra_argv = $pa->extra_argv();
my $usage = $pa->usage();
my $constructor_params = $pa->constructor_params();
my $cli_params = $pa->cli_params();
=head1 DESCRIPTION
This object contains the result of a L<MooseX::Getopt/process_argv> call. It
contains all the information that L<MooseX::Getopt/new_with_options> uses
when calling new.
=head1 METHODS
=head2 argv_copy
Reference to a copy of the original C<@ARGV> array as it originally existed
at the time of C<new_with_options>.
=head2 extra_arg
Arrayref of leftover C<@ARGV> elements that L<Getopt::Long> did not parse.
=head2 usage
Contains the L<Getopt::Long::Descriptive::Usage> object (if
L<Getopt::Long::Descriptive> is used).
=head2 constructor_params
Parameters passed to process_argv.
=head2 cli_param
Command-line parameters parsed out of C<@ARGV>.
=head1 AUTHOR
Stevan Little <stevan@iinteractive.com>
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2007 by Infinity Interactive, Inc.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut
|