On Tue, Nov 06, 2001 at 08:58:45PM -0500, Michael G Schwern wrote: > In the course of revamping t/io/argv.t for VMS, I've added two > functions to t/test.pl. > > isnt() is useful for replacing this sort of thing: > > print "not " unless defined $foo; > print "ok 42\n"; > > with > > isnt($foo, undef); > > The advantage being if it fails $foo will be printed out. > > > next_test() just increments the test counter. This is good for tests > which just can't be wedged into the interface. It prints the ok, and > then next_test() is called to make test.pl's counter happy.
Thanks, applied. (With a slight change so that undef values are printed as undef.) -- $jhi++; # http://www.iki.fi/jhi/ # There is this special biologist word we use for 'stable'. # It is 'dead'. -- Jack Cohen