http://qs1969.pair.com?node_id=900319


in reply to Exception::Class - how to use?

Hi monks, I have a similar problem...I'm not sure how to use this package..moreover, I'm not sure if this package is actually right to meet my needs either.. Please have a look
package MyExceptions; use strict; use warnings; use Exception::Class ( 'MyExceptions', 'MyExceptions::RegionNotFound' => { isa => 'MyExceptions' }, 'MyExceptions::CommandNotExecuted' => { isa => 'MyExceptions' } ); 1;

Then I have another module to report the exceptions handled

package ReportGenerator; use strict; use warnings; sub CheckResult { my ( $result, $info ) = @_; #Here is want to check of $result and throw an exception of the kin +d MyExceptions::RegionNotFound->throw(error => 'bad number'); #how do I do it?? }

The user would script something like this

$Report->CheckResult($ABC->Command(100,100),"Someinfo")
Could you throw some light on this please..I have no idea is this kind of exception handling is the right way either..