>>>>> On Tue, 29 Apr 2008 16:54:24 +0100, "Robin Barker" <Robin.Barker@npl.co.uk> said: > From: Nicholas Clark [mailto:nick@flirble.org]On >> The upcoming 5.8.9 will have the same behaviour as 5.10. >> I don't know which source code change changed this behaviour. > Perhaps change 26192. That was my guess when I submitted change 27633. My binary search says 22074: ----Program---- #!/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 } ----Output of .../p7dcK3N/perl-5.9.0@22071/bin/perl---- < 12 ----EOF ($?='0')---- ----Output of .../pvpF9Iw/perl-5.9.0@22074/bin/perl---- 12 12 ----EOF ($?='0')---- -- andreasThread Previous | Thread Next