Skip to content

Instantly share code, notes, and snippets.

@j1n3l0

j1n3l0/2012-07-24_hash_equality.t

Created July 24, 2012 14:15
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save j1n3l0/3170145 to your computer and use it in GitHub Desktop.
Save j1n3l0/3170145 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
2012-07-24_hash_equality.t
use 5.014;
use Test::Most;
use constant SENTINAL => {};
{
use signatures;
use Data::Compare 'Compare';
sub demo_is_equal($a, $b) { Compare( $a, $b ) }
}
ok demo_is_equal( SENTINAL, {} ), 'SENTINAL == {}';
done_testing;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment