4 use Test::More tests => 4;
5 use Test::NoWarnings 1.04 ':early';
13 with 'MooseX::Getopt';
30 my $app = App->new_with_options(argv => [ '--verbose', '--length', 50 ]);
33 ok($app->verbose, '... verbosity is turned on as expected');
34 is($app->length, 50, '... length is 50 as expected');