#!./perl BEGIN { chdir 't' if -d 't'; @INC = '../lib'; require './test.pl'; } plan( tests => 1); require Config; import Config; if (($Config{'extensions'} !~ /\bFcntl\b/) ){ BAIL_OUT("Perl configured without Fcntl module"); } ##Finds IO submodules when using \b if (($Config{'extensions'} !~ /\bIO\s/) ){ BAIL_OUT("Perl configured without IO module"); } # hey, DOS users do not need this kind of common sense ;-) if ($^O ne 'dos' && ($Config{'extensions'} !~ /\bFile\/Glob\b/) ){ BAIL_OUT("Perl configured without File::Glob module"); } pass('common sense');