use strict; use warnings; BEGIN { $|=1; print "Content-Type:text/html; charset=utf-8\n"; print "Content-Language: utf8;\n\n"; } use lib '/'; use lib '/var/www/lib/'; #push @INC, '/var/www/lib/'; use RegexpCharClassesThai; #Regexp-CharClasses-Thai.pm use utf8; use Test::More; #### use RegexpCharClassesThai; #Regexp-CharClasses-Thai.pm ... my @inthai = &IsThaiLCons; ... Undefined subroutine &ModPerl::ROOT::ModPerl::PerlRun::var_www_cgi_test_2d +thai_2dmod_2epl::IsThaiLCons called at /var/www/cgi/test-thai-mod.pl line 19.