diff options
Diffstat (limited to 't/lib/commonsense.t')
| -rw-r--r-- | t/lib/commonsense.t | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/t/lib/commonsense.t b/t/lib/commonsense.t new file mode 100644 index 0000000000..6e313073d2 --- /dev/null +++ b/t/lib/commonsense.t @@ -0,0 +1,25 @@ +#!./perl + +chdir 't' if -d 't'; +@INC = '../lib'; +require Config; import Config; +if (($Config{'extensions'} !~ /\b(DB|[A-Z]DBM)_File\b/) ){ + print "Bail out! Perl configured without DB_File or [A-Z]DBM_File\n"; + exit 0; +} +if (($Config{'extensions'} !~ /\bFcntl\b/) ){ + print "Bail out! Perl configured without Fcntl module\n"; + exit 0; +} +if (($Config{'extensions'} !~ /\bIO\b/) ){ + print "Bail out! Perl configured without IO module\n"; + exit 0; +} +# hey, DOS users do not need this kind of common sense ;-) +if ($^O ne 'dos' && ($Config{'extensions'} !~ /\bFile\/Glob\b/) ){ + print "Bail out! Perl configured without File::Glob module\n"; + exit 0; +} + +print "1..1\nok 1\n"; + |