Front page | perl.perl5.porters |
Postings from November 2003
>>>>> On Tue, 18 Nov 2003 13:20:24 +0000, Dave Mitchell <davem@fdgroup.com> said:
>> Andreas, could you try this below with binsearchaperl ?
>>
>> #!perl
>> sub foo { "x" }
>> my ($A, $B);
>> $B = ($A = '' . foo()) . "y";
>> print "$A,$B" eq "x,xy" ? "ok\n" : "not ok\n";
>> __END__
> Looks like 3612 judging by these excerpts from the log:
Confirmed.
--
andreas
Thread Previous