my $locale = setlocale(LC_CTYPE);