Select Code to Download

use MyTestMoreRunner;
 
...
);

$testMoreWrapper->done();

sub okExplain {
    my ($result, $desc, $dumpMeOnFailure, $moreDiag) = @_;
    $moreDiag ||= ""; 
    ok($result == 1, $desc) || diag(explain($dumpMeOnFailure), $moreDi
+ag);
}