Exception die method

CPAN::Forum

Thread

Object-InsideOut [search.cpan.org] [Kobes search] [View and report bugs] [Ratings 4.5

(2) ]

[AnnoCPAN] [CPAN Tests results] [CPANTS]

Posted on Wed Nov 23 16:04:50 2005 by earl

Exception die method

I put the following sub in my code.

sub check_object_type { my ($object, $expected_type) = @_; unless(Object::InsideOut::is_it($object, $expected_type)) { my actual_type = ref($object); OIO::Args-> die('message' => q/Bad parameter: Wrong type/, 'Usage' => "Expected an object or ref of type \"$expected_type\", ". "but saw an object or ref of type \"actual_type\""); } }

I want die to report the line of the caller's caller, not the caller.The body of this sub use to occur several times in my code. So, I decided to make this sub and the replace the redundant segments with a sub call. However, I don't want the reported line to change.

If I was using Carp, I suspect I would have to do a "local Carp::CarpLevel = 1;" before the Carp call. I was having difficult solving this problem, because I couldn't find the die method declaration in Exception::Class or Object::InsideOut.

Direct Responses: 1392 | Write a response

Posted on Wed Nov 23 16:36:30 2005 by jdhedden in response to 1391

Re: Exception die method

Wow! I'm impressed. You're really getting into my code, and using things I haven't documented yet. (Which is great.)

OIO::die() can be found at the beginning of Object/InsideOut.pm.

The specific parameter you're looking for is 'caller_level'. Just add 'caller_level => 1' to your OIO::Args->die() call, and you'll be good.

Also, is_it() is in Object::InsideOut::Util. (I presume that's just a typo in your post.)

Write a response

Service launched on 2nd of February 2005.
Comments, and other submissions on CPAN Forum are Copyright 2005-2007, their respective owners.
Site maintainer is not responsible for content. Privacy Policy

Maintained and hosted by Gabor Szabo at Perl Training Israel