As part of a much more detailed email about some cool code he's writing, Yves Orton <[EMAIL PROTECTED]> wrote (in part): > > my ($ar,$x,$y)=([]); > $ar->[0]=\$ar->[1]; > $ar->[1]=\$ar->[0]; > $x=\$y; > $y=\$x; > > Test::Differences::eq_or_diff($ar,[$x,$y]); > > Outputs: > > not ok 1 > # Failed test (D:\Perl\Scratch\tmbug.pl at line 12) > # +----+-------------------+-------------------+ > # | Elt|Got |Expected | > # +----+-------------------+-------------------+ > # * 0|SCALAR(0x1abf1b8) |SCALAR(0x1de7d18) * > # * 1|SCALAR(0x1abf1f4) |SCALAR(0x1bb9864) * > # +----+-------------------+-------------------+ > > Oops, it didn't recognize that this is a complex data structure. Never > mind, we can work around this by wrapping the two items in anonymous hashes:
And so Test::Differences 0.43 was born. If you're using Test::Differences to compare complex data structures, 0.43 fixes this serious bug. - Barrie