use
Test::More;
my
$query_string
=
"one=1&two=2&http_status=200"
;
my
$private_key
=
"integration_private_key"
;
my
$expected_hash
=
"3970ae558c51cf6f54340b5b1842d47ba1f5a19e"
;
is(hexdigest(
$private_key
,
$query_string
),
$expected_hash
,
"Braintree digest works"
);
is(hexdigest_256(
"secret-key"
,
"secret-message"
),
"68e7f2ecab71db67b1aca2a638f5122810315c3013f27c2196cd53e88709eecc"
,
"Braintree digest 256 works"
);
done_testing();