>perl -MPOSIX -MTest::More -le "cmp_ok(1.4/10, '==', 0.14, 'division'); done_testing();"
not ok 1 - division
#   Failed test 'division'
#   at -e line 1.
#          got: 0.14
#     expected: 0.14
1..1
# Looks like you failed 1 test of 1.