quoted
quoted
quoted
quoted
"Randal" == Randal L Schwartz [off-list ref] writes:
quoted
quoted
quoted
quoted
"Randal" == Randal L Schwartz [off-list ref] writes:
Randal> sub blessed {
Randal> my $item = shift;
Randal> local $@; # don't kill an outer $@
Randal> ref $item and eval { $item->can('can') };
Randal> }
Randal> Oops, lose the local $@ line. Just found out this is a broken
Randal> thing in current Perls. The rest is good though.
And thirdly, ignore what I *just* said, and concentrate on what I *previously*
said, becaused my testing was off.
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
[off-list ref] <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!