>perl -MMath::Ryu -MTest::More -le "cmp_ok(0.1 ** 2, '==', 0.01, 'T1'); done_testing();"
not ok 1 - T1
#   Failed test 'T1'
#   at -e line 1.
#          got: 0.010000000000000002
#     expected: 0.01
1..1
# Looks like you failed 1 test of 1.