Help for this page
use JSON::XS; my %bingo = ( one => 1, ... print "Is bango bongo? ", encode_json(\%bango) eq encode_json(\%bongo) ? "yes!\n" : "noes :( +\n";
Is bingo bongo? yes! Is bango bongo? noes :(