11 package TestHelpScript;
13 with 'Catalyst::ScriptRole';
14 __PACKAGE__->meta->get_attribute('help')->cmd_aliases('h');
16 sub _exit_with_usage { $help++ }
23 local $TODO = 'This is bork';
28 local $TestHelpScript::help;
31 TestHelpScript->new_with_options(application_name => 'TestAppToTestScripts')->run;
33 ok $TestHelpScript::help;