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);