Re: $^S and eval

[Pete Jordan <pjordan1@email.mot.com>]

Tom Christiansen wrote:

> I'd grep for it in the pods in the _63 dist.

OK, that's clear enough. Trouble is, I only want to munge the parameters
to C<die>; I can't see any way of getting at the original code (ie.
ultimately C<Perl_vdie()>) without writing XS code... Maybe there /is/
no alternative.

Ho hum.

Given that my code is only used here and that my desired messing with
C<$SIG{__DIE__}> is (at least as of _63) functionally equivalent to
intercepting calls to C<CORE::GLOBAL::die>, I think I'll continue with
my current arrangement, depreceated or no.

> I'd not clear to me that that facility has been more than prototyped.
> I don't know that anyone has really spent time fleshing it out.

Pity. In the vanishingly unlikely situation of my having sufficient
tuits, I might do something about that. A standard exception class (even
if it only created a skeleton exception object) would at least provide a
common base for subclassing.

Pete
-- 
use Disclaimer::Standard;	# Motorola GSM Software Factory
my $phone='+44 1793 564450';	# "'Not twisted,' Salzy once said of
my $fax='+44 1793 566918';	#  her own passion, 'it is helical.
my $mobile='+44 7973 725120';	#  That sounds better.'"

---

References to:

Tom Christiansen <tchrist@chthon.perl.com>

---

[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index][Thread Index][Top&Search][Original]

---