Tutarsız davranışlar

Question

Neden Aşağıdaki kod yok "bir ARRAY referans olarak tanımlanmamış bir değer kullanılamaz":

use strict; 
use warnings; 
no warnings 'uninitialized'; 

use Data::Dumper; 

my $user; 
foreach my $enterprise(@{$user->{ENTERPRISES}}) { 
    print qq{Enterprise:}, $enterprise; 
} 
print Dumper($user), qq{Done!\n}; 

:

use strict; 
use warnings; 
no warnings 'uninitialized'; 

use Data::Dumper; 

my $user; 
my @data = @{$user->{ENTERPRISE}}; # Error on this line 
print Dumper($user), qq{Done!\n}; 

, hatayı "Can't use an undefined value as an ARRAY reference" atın aşağıdaki kodla ederken

şey atmak yok mu, bunun yerine döndürür:

$VAR1 = { 
      'ENTERPRISES' => [] 
     }; 
Done! 

Hem kusurlu morina var İçlerinde e, ancak sadece bir hata atıyor.

Olası Cevap: Burada doğru yoldaPerl's autovivification?

Am I? Girdiniz için teşekkürler.

Answer 1

Evet, ikinci durumda olana otomatikleştirme denir ve yalnızca ikinci durumda gerçekleşir çünkü otolık giderme yalnızca ^[1] için geçerlidir.

Yani

@{ $x } = $y; 

anlamına gelmez

@{ $x //= [] } = $y; 

ama

$y = @{ $x }; 

demektir

$y = @{ $x //= [] }; 

Foreach'ın döngü değişkenini, üzerinde yinelediği listenin her bir öğesine taklit ettiğini unutmayın, bu nedenle bu elemanlar lvalues ​​olarak değerlendirilir.

Otomatikleştirme, perlref numaralı belgede belgelenmiştir ve autovivification pragma aracılığıyla otomatik olarak denetimi denetleyebilirsiniz. Nihai deferencing bir indeksleme (örneğin ->[] veya ->{}) takip edilirse

---

1. referans ifadesi kendisini dizinlenmiş bütün olmasa bile bir lvalue olarak değerlendirilir. Bu, $y = @{ $x };, $y = @{ $x }; olmasa bileve $y = ${ $x }[0];'un $x'u otomatik olarak kapatabileceği anlamına gelir.