Veri :: Dalgıç Veri :: Diver, derin iç içe geçmiş yapıların unsurlarına basit, geçici bir erişimdir.
Şimdi İndirin

Veri :: Dalgıç Sıralama ve Özet

Veri :: Dalgıç Etiketler

Perl modülü yuvalanmış yapılar veri sürücüsü iç içe geçmiş yapılar

Veri :: Dalgıç Açıklama

Veri :: Dalf, derin iç içe geçmiş yapıların unsurlarına basit, geçici bir erişimdir. Veri :: Dalf, derin iç içe geçmiş yapıların unsurlarına basit, geçici bir erişimdir. ), DiveError (), Diveclear () ve Divadie () destek fonksiyonları. $ root = {top => ,} ,},],}; # $ Değerini 'evet' # ($ root -> {en iyi} {ikinci} {key} {üç} {exists}): $ değeriniz = dalış ($ root, qw (Top 1) ikinci anahtarı 3 üç var)); # $ Değerini UNDEF () olarak ayarlar () çünkü "eksik" mevcut değildir: $ value = Dive ($ root, qw (üst 1 saniyelik anahtarı 3 üç eksik)); # $ Değerini UNDEF () olarak ayarlar. anahtar 4 ...)); # $ Değerini UNDEF () olarak ayarlar, çünkü # $ root -> {top} {ikinci} {key} Ölümcül bir hata olurdu: $ value = Dalış ($ root, qw (Top 1 ikinci anahtar) -5 ...)); # $ REF'a RE ROOT -> {Üst} {Yeni} {SUB} (# @ {$ root -> {top}} ve iki isimsiz karma bulunur): $ Ref = Diveref ($ root , QW (ilk 9 yeni alt)); # die () s, çünkü "diğer" geçerli bir sayı değil: $ ref = Diveref ($ root, qw (diğer ...)); # Yapar: $ root -> {num} {1} {2} = 3; # (Sayısal tuşlara rağmen hashesiive eder.) Divleval ($ root, (qw (num 12))) = 3; # Aynı şey: $ {Diveref ($ root, 'num', 1, 2)} = 3; # Değer yukarıda alır, $ değeri = 3: $ değeri = Dival ($ root, 'num', 1, 2); # Aynı şey: $ value = $ {Diveref ($ root, (qw (num 12)))}; # $ Root yapmaya çalışır -> {top {1} ve ölür. $ Root -> {top} bir dizi referansıdır: DiverF ($ root, 'üst', 1); # Son adımda yalnızca autovivify için: $ Ref = Diveref (Dalış ($ Kök, QW (Top 1 İkinci Anahtar 3)), 'Eksik'); if ($ ref) {$$ ref = 'ben de'} else {benim ($ nestedref, $ svkey, $ errdesc) = diveerror (); ölmek "$$ SVKey: $ Errdescn" aracılığıyla $ Nestedref tarafından talep edemedi "; } Gereksinimler: · Perl

Veri :: Dalgıç İlgili Yazılım