Make it possible to disable and control hash key traversal randomization
[perl.git] / t / lib / commonsense.t
1 #!./perl
2
3 BEGIN {
4     chdir 't' if -d 't';
5     @INC = '../lib';
6     require './test.pl';
7 }
8
9 plan( tests => 1);
10
11 require Config; import Config;
12
13 if (($Config{'extensions'} !~ /\bFcntl\b/) ){
14   BAIL_OUT("Perl configured without Fcntl module");
15 }
16 ##Finds IO submodules when using \b
17 if (($Config{'extensions'} !~ /\bIO\s/) ){
18   BAIL_OUT("Perl configured without IO module");
19 }
20 # hey, DOS users do not need this kind of common sense ;-)
21 if ($^O ne 'dos' && ($Config{'extensions'} !~ /\bFile\/Glob\b/) ){
22   BAIL_OUT("Perl configured without File::Glob module");
23 }
24
25 pass('common sense');
26