http://qs1969.pair.com?node_id=668119

nobull has asked for the wisdom of the Perl Monks concerning the following question:

I came across the following code in Net::SSLeay:
sub do_https4 { splice(@_,1,0) = 1; do_httpx4; } # Legacy undocumente +d

The trouble is that this code doesn't actually compile. I'm guessing this doesn't matter (at least on some level) because the module uses AutoLoader so the above code doesn't get compiled unless someone calls do_https4.

However in order to debug Net::SSLeay I've temporarily prevented it from auto-splitting so I've had to remove the bogus code.

What I'm curious about is what the code is supposed to do! Is it a fact that in some previous version of Perl this code behaved like:

sub do_https4 { splice(@_,1,0,1); do_httpx4; }

And if so when did this change?