On Thu, 2 Jan 2003, Philip Pereira wrote:
> if (1) {
> print "The test worked!\n";
> }
<advice type="silly in relation to this">
For all tests it's better to use a Test::Harness compatible output (e.g.
"ok 1 - the test worked"), and if all possible for maximum compatability
for using in conjuction with with other testing suites, please use a
Test::Builder based package, like Test::Simple or Test::More to create
this message to ensure consistant numbering.
#!/usr/bin/perl
# Turn on perl's safety features
use strict;
use warings;
# Load the testing library, expect 1 test to run
use Test::Simple tests => 1;
# simple test
ok("true","simple test");
--
#!/usr/bin/perl -T
use strict;
use warnings;
print q{Mark Fowler, [EMAIL PROTECTED], http://twoshortplanks.com/};
