Perl ref（$ something）はいつ "ARRAY（0x913310）"を返しますか？

Question

$val = ref($something)の値をテストする複雑なPerlコードがあります。残念ながら、$valが"ARRAY(0x913310)"であり、"ARRAY"でない状況があるため（Perlデバッガーによると）、私のコードは失敗します。

ref()のドキュメントを読むと、そのような値は考えられる戻り値の1つとして表示されません。また、デバッガで対話的に再現しようとすると、有効な戻り値しか表示されません。

これはPerlベースのバグですか？ 私は、x86_64のSLES 11 SP 4からPerl 5.10.0を使用しています...

Answer 1

は、クラスARRAY(0x913310)のオブジェクトです。

$ perl -E' 
    my $class = "".[]; 
    say $class; 
    my $o = bless({}, $class); 
    say ref($o); 
' 
ARRAY(0x115e360) 
ARRAY(0x115e360)