4 use Test::More tests => 7;
6 use Test::NoWarnings 1.04 ':early';
12 with 'MooseX::Getopt';
27 @ARGV = qw(--bar 10 file.dat);
32 $pa = Testing::Foo->process_argv(baz => 100);
35 '... this should work'
37 isa_ok($pa, 'MooseX::Getopt::ProcessedArgv');
39 is_deeply($pa->argv_copy, [
44 is_deeply($pa->cli_params, {
47 is_deeply($pa->constructor_params, {
49 }, 'constructor_params');
50 is_deeply($pa->extra_argv, [