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