diff --git a/locale.c b/locale.c index 43f414884814..e9dfea545fdb 100644 --- a/locale.c +++ b/locale.c @@ -6006,6 +6006,14 @@ S_populate_hash_from_localeconv(pTHX_ HV * hv, # ifndef LOCALECONV_NEEDS_CRITICAL_SECTION if (calculate_utf8ness_here) { + DEBUG_U(PerlIO_printf( Perl_debug_log, + "name=%s, value=%s=%s, locale=%s\n", + category_strings->name, + value, + get_displayable_string(value, + value + strlen(value), + false), + locale)); utf8ness = ( UTF8NESS_YES == get_locale_string_utf8ness_i(value,