Firstly, is there anyway we could get Test::Builder's diag (and thus Test::More's) diag to return false not true like it currently does.
This would then allow me to write simply sub is_reversed { return $Tester->ok($_[0] eq reverse($_[1])) or $Tester->diag("The reverse of '$_[0]' is '".reversed($_[0]). "' not '$_[1]' as expected") } rather than having to do the horrible "&& 0" at the end to ensure that the method returns the correct truth (otherwise is_reversed will return true no matter what is called) Secondly, I was wondering about eq_set in Test::More. ok(eq_set([1,1,1],[1])); fails, where really it should work as sets don't care about reoccurring elements. Should this be 'eq_bag' instead? Later. Mark. -- s'' Mark Fowler London.pm Bath.pm http://www.twoshortplanks.com/ [EMAIL PROTECTED] ';use Term'Cap;$t=Tgetent Term'Cap{};print$t->Tputs(cl);for$w(split/ +/ ){for(0..30){$|=print$t->Tgoto(cm,$_,$y)." $w";select$k,$k,$k,.03}$y+=2}