use Test::More tests => 1;

ok($condition, $text)
   or diag('Meh, something went wrong!');