Front page | perl.perl5.porters |
Postings from July 2001
Ilya Zakharevich <ilya@math.ohio-state.edu> wrote
> - my $mess = Carp::longmess(@_);
> + my $mess = "@_";
> + {
> + package Carp; # Do not include us in the list
> + eval {
> + $mess = Carp::longmess(@_);
> + };
> + }
Shouldn't the fallback be
my $mess = join '', @_;
?
And even that won't do the right thing with objects. You need something
like
my $mess = ref $_[0] ? $_[0] : join '', @_;
Also, now that there is a fallback if Carp fails to load, can't we
strike out the
die(@_, "\nCannot print stack trace, load with -MCarp option to see stack")
just above?
Mike Guy
Thread Previous
|
Thread Next