From: Randal L. Schwartz <merlyn@stonehenge.com>
Date: Tue, 11 Jul 2006 01:40:48 GMT
Subject: Re: [PATCH] Eliminate Scalar::Util usage from private-Error.pm
Message-ID: <867j2knckf.fsf@blue.stonehenge.com>
In-Reply-To: <86bqrwncnq.fsf@blue.stonehenge.com>

>>>>> "Randal" == Randal L Schwartz <merlyn@stonehenge.com> writes:

Randal> sub blessed {
Randal>         my $item = shift;
Randal>         local $@; # don't kill an outer $@
Randal>         ref $item and eval { $item->can('can') };
Randal> }

Oops, lose the local $@ line.  Just found out this is a broken
thing in current Perls.  The rest is good though.

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!