हैश कुंजी एन्कोडिंग: मैं यहां डेवेल :: पीक :: डंप दो अलग-अलग परिणामों के साथ क्यों मिलता हूं?

Question

मैं यहां डेवेल :: पीक :: डंप दो अलग-अलग परिणामों के साथ क्यों मिलता हूं?

#!/usr/bin/env perl 
use warnings; 
use 5.014; 
use utf8; 
binmode STDOUT, ':encoding(utf-8)'; 
use Devel::Peek; 

my %hash1 = ('müller' => 1); 
say Dump $_ for keys %hash1; 

my %hash2; 
$hash2{'müller'} = 1; 
say Dump $_ for keys %hash2; 

---

आउटपुट:

SV = PV(0x753270) at 0x76d230 
    REFCNT = 2 
    FLAGS = (POK,pPOK,UTF8) 
    PV = 0x759750 "m\303\274ller"\0 [UTF8 "m\x{fc}ller"] 
    CUR = 7 
    LEN = 8 

SV = PV(0x753270) at 0x7d75a8 
    REFCNT = 2 
    FLAGS = (POK,FAKE,READONLY,pPOK) 
    PV = 0x799110 "m\374ller" 
    CUR = 6 
    LEN = 0 

Answer 1

उन scalars दोनों बिल्कुल एक ही स्ट्रिंग होते हैं। केवल अंतर ही है कि स्ट्रिंग को आंतरिक रूप से कैसे संग्रहीत किया जाता है।

मेरा अनुमान है कि हैश में कुंजी का पता लगाने की कोशिश करते समय तुलना को आसान बनाने के लिए कुंजी सामान्यीकृत होती है।

Answer 2

यह कोई जवाब नहीं है, मेरा मानना ​​है कि ikegami प्रतिक्रिया सही है। मैं बस कुछ कोड के साथ कुछ अवलोकन जोड़ना चाहता था।

मैंने निम्नलिखित कोड 5.10 से 5.15 के माध्यम से चलाया और व्यवहार सुसंगत है।

use utf8; 
use Test::More; 

{ 
    my %h = ('müller' => 1); 
    my $k = (keys %h)[0]; 
    ok(utf8::is_utf8($k), 'UTF-8 Latin-1 hash key has SvUTF8 set'); 
} 

{ 
    my %h = ('müller' => 1); 
     $h{'müller'} = 2; 
    my $k = (keys %h)[0]; 
    ok(! utf8::is_utf8($k), 'UTF-8 Latin-1 hash key does not has SvUTF8 set after assignment'); 
} 

{ 
    my %h = ('☺' => 1); 
     $h{'☺'} = 2; 
    my $k = (keys %h)[0]; 
    ok(utf8::is_utf8($k), 'UTF-8 (> Latin-1) hash key has SvUTF8 set after assignment'); 
} 

done_testing; 

यदि दूसरा परीक्षण अपेक्षित है, तो यह पहला मौन डाउनग्रेड होगा जिसे मैं जानता हूं। मुझे लगता है कि पी 5 पी का अंतिम जवाब है या नहीं, यह अनुकूलन बग या अपेक्षित व्यवहार है या नहीं। (sv_dump एक अनुकूलन की तरह दिखता है (पीओके, नकली, रीडोनली, पीपीओके))