Help for this page

Select Code to Download

Select or download this

use My::Exception::Class (
    'My::Exception::BadInput' => {
...
XYZ:
    print "OK";
    My::Exception::BadInput->throw(message => ABC::PACKAGE_CONSTANT);

Select or download this

Index: options.c
===================================================================
...
+    def->parser_opts= parsePerlOption;
     return def;
 }