use strict; use warnings; use Test::More; plan tests => 3; require_ok('foo.pl'); cmp_ok(do_this(), '==', 4, 'expect do_this() to return 4)'); cmp_ok(do_that(), '==', 6, 'expect do_that() to return 6)'); __END__