in reply to Re^2: Using Perl Exception Class
in thread Using Perl Exception Class

Have you read the Exception::Class documentation I linked to previously? What concrete questions to you still have that the documentation does not answer?

Replies are listed 'Best First'.
Re^4: Using Perl Exception Class
by Perllace (Acolyte) on Apr 20, 2011 at 10:51 UTC
    Hi Corion, I'm sorry about this..I'm really ignorant about exceptions...

    As of now, I have a module of the kind 

    package MyExceptions;

use strict;
use warnings;

use Exception::Class (
    'MyExceptions',
    'MyExceptions::RegionNotFound' =>
    { isa => 'MyExceptions' },
    'MyExceptions::CommandNotExecuted' =>
    { isa => 'MyExceptions' }
);

    [download]
    The other module is 
    
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');
#I'm not sure how to do this..
}
1;

    [download]
    The user would inturn script something like this $Report->CheckResult($ABC->Command(100,100),"Tapping Home");

    Thanks for your help..

[reply]
[d/l]
[select]

      Have you read the documentation I linked? Searching the documentation for "throw" shows me:

      # try
eval { MyException->throw( error => 'I feel funny.' ) };

      [download]

      If you are unclear about the concept of structured exceptions in Perl, I can only recommend to avoid them alltogether. Structured exceptions are not well-supported in Perl, as the common way of exceptions are strings, as documented in die. If you feel you need to use something else, you should have good reasons to do so.

[reply]
[d/l]

In Section Seekers of Perl Wisdom