11 package TestHelpScript;
13 with 'Catalyst::ScriptRole';
15 sub _getopt_full_usage { $help++ }
23 local $TestHelpScript::help;
26 TestHelpScript->new_with_options(application_name => 'TestAppToTestScripts')->run;
28 ok $TestHelpScript::help, 'Got help';