LWP is broken for the new perl, but the new perl is still broken.
Randal Schwartz (merlyn@stonehenge.com)
12 Jan 1997 17:03:55 -0700
Yup. Looks like Perl is broken, but LWP is still gonna need to change
to something like my test case indicates. "A" = URI::URL::_generic,
and "B" = URI::URL::http, for example.
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@ora.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------- Start of forwarded message -------
From: Ilya Zakharevich <ilya@math.ohio-state.edu>
Message-Id: <199701122356.SAA22119@monk.mps.ohio-state.edu>
Subject: Re: overloading broken in _20, or am I dense?
To: merlyn@stonehenge.com (Randal Schwartz)
Date: Sun, 12 Jan 1997 18:56:39 -0500 (EST)
Cc: perl5-porters@africa.nicoh.com
Randal Schwartz writes:
>
>
> This code works fine with _11, but breaks with _20. Did I mess
> something up? Or is something seriously broken in _20? (This is at
> the heart of making LWP work again.)
>
> #!/home/merlyn/test/bin/perl
>
> BEGIN {
> package A;
>
> sub as_string {
> shift->{"string"};
> }
> }
>
> BEGIN {
> package B;
> @ISA = qw(A);
> use overload ('""' => 'as_string', 'fallback' => 1);
>
> sub new {
> my $self = bless {}, shift;
> $self->{"string"} = shift;
> $self;
> }
> }
>
> $thing = new B "newbie";
> ## print $thing->as_string;
> print "$thing";
Confirmed here: breaks between _17 and _17+overload-patch.
Ilya
------- End of forwarded message -------