http://www.perlmonks.org?node_id=839657


in reply to Problem defining a Test::Deep structure to match this arrayref

Wouldn't 
cmp_deeply($x, any([11,22,[[1],[-1]]], [11,[[1]]), 'test1');
cmp_deeply($y, any([11,22,[[1],[-1]]], [11,[[1]]), 'test2');

[download]
do the trick?

In Section Seekers of Perl Wisdom