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

Reply via email to