2 use warnings FATAL => 'all';
4 use Test::More tests => 4;
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');