sub ok ($;$) {
    &Test::More::ok(@_) or BAIL_OUT("Test is failing")
}