Testing with Perl
prev
|
next
Test::Simple
ok()
use Test::Simple tests => 1; ok( $foo eq $bar, 'foo is bar' );
That's it!