> On Wed, Nov 27, 2002 at 03:24:51PM +0100, Rafael Garcia-Suarez wrote: > > I'd like to have a custom version of is(), say binary_is(), that > > reports 'strings 1 and 2 differ at byte 635, got 0x92, expected 0x42' > > or 'strings 1 differ in length, got 3874, expected 3875'.
Oooh, that would be really helpful. I often find myself writing tests which just currently do a ok($slurp eq $test_data, "files match"); as is() doesn't produce very helpful output > See http://www.pobox.com/~schwern/talks/Writing_A_Test_Library/full_slides/ > for details about using Test::Builder. <plug>See also Acme::Test::Buffy (lame example testing module), and Test::Builder::Tester for help testing Test::Binary.</plug> 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}