Front page | perl.perl5.porters |
Postings from April 2008
On Tue, Apr 29, 2008 at 01:29:24PM +0200, Bram wrote:
> $cat foo.pl
>
> #!/usr/bin/perl -l
>
> sub TIESCALAR {
> my $foo = $_[1];
> bless \$foo, "main";
> };
>
> sub FETCH { ${ $_[0]} };
> tie my $x, "main", 4;
> tie my $y, "main", 8;
> for (1 .. 2) { print $x | $y }
>
> perl588 foo.pl # < and 12
> perl5100 foo.pl # 12 and 12
> perl-blead foo.pl # 12 and 12
>
> So this was resolved in perl 5.10.
The upcoming 5.8.9 will have the same behaviour as 5.10.
I don't know which source code change changed this behaviour.
Nicholas Clark
Thread Previous
|
Thread Next