Test case module for Perl