Perl Module test