Re: [PATCH] Eliminate Scalar::Util usage from private-Error.pm
- From
Randal L. Schwartz <merlyn@stonehenge.com>
- Date
- Jul 11, 2006, 01:40 UTC
- 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!