|
From Test::Simple to Test::Extreme - Basic Testing
|
8
|
|
|
Simple Tests from Scratch
In Perl testing culture, tests cases simple - something either works or it don't:
print "ok\n";
print "not ok\n";
for instance:
if ($rocket->liftoff) {
print "ok\n";
}
else {
print "not ok\n";
}
|
|
