2010-03-10T13:56:39+01:00

eq_deeply with Data::Dumper

From http://dev.catalystframework.org/svnweb/bast/revision?rev=8823

use Test::Deep qw(eq_deeply);
...
return eq_deeply($bind_ref1, $bind_ref2);

vs

use Data::Dumper;
...
local $Data::Dumper::Useqq = 1;
local $Data::Dumper::Sortkeys = 1;
return Dumper($bind_ref1) eq Dumper($bind_ref2);

comments powered by Disqus