chdir 't' if -d 't';
@INC = '../lib';
require Config; import Config;
- if ($Config{ccflags} =~ /\bD?NO_LOCALE\b/) {
+ if (!$Config{d_setlocale} || $Config{ccflags} =~ /\bD?NO_LOCALE\b/) {
print "1..0\n";
exit;
}
# even the default locale will taint under 'use locale'.
sub is_tainted { # hello, camel two.
+ local $^W; # no warnings 'undef'
my $dummy;
not eval { $dummy = join("", @_), kill 0; 1 }
}