source: trunk/essentials/dev-lang/perl/lib/Dumpvalue.t@ 3310

#!./perl

BEGIN {
        chdir 't' if -d 't';
        @INC = '../lib';
        if (ord('A') == 193) {
            print "1..0 # skip: EBCDIC\n";
            exit 0;
        }
        require Config;
        if (($Config::Config{'extensions'} !~ m!\bList/Util\b!) ){
            print "1..0 # Skip -- Perl configured without List::Util module\n";
            exit 0;
        }
}